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EDITORIAL 


From the feedback I've received concerning 
‘issue #13, most of you were very happy about the 
"new" format so things will stay pretty much the 
same. A good number of comments specifically men- 
tioned their satisfaction with the "language lab" 
‘go we may expand on it a bit in future issues, 
‘Lots of good stuff in store for you BASIC, FOCAL 
and TINY BASIC users. Thanks to all of you who 
responded to my questions on modifying BASIC to 
skip the initialization messages. As you will 
soon know, that question and many others will be 
answered in this issues’ BASIC column. Also, 
thanks to Dick Grabowski of HDE and Bob Kurtz of 
Micro-Z, we now have a new command for BASIC, 


A number of you have been asking for some 
‘terminal-oriented software so we have modified the 
original APPLE disassembler for the KIM. You'll 
need more memory, but if you have a terminal you're 
finding that out anyway. 


Those of you with hard copy will no doubt en- 
joy the BANNER program. The present character set 
is designed for a 40 column printer but can easily 
(2?) be re-designed for wider terminal widths. When 
you do come up with a new character set, send it in 
so the rest of us can enjoy it. Send it in on a 
cassette to make life easier for us and we'll pub- 
lish it and/or offer it on cassette, depending on 
its design. There's enough info in the article to 
enable you to design your own character set and 
further info can be gotten from the Kilobaud ar- 
ticle. 


SUBMITTING ARTICLES 


Since all articles will be retyped they need 
only be readable. Typing it would, of course, 
guarantee readability. Program listings, on the 
other hand, may not be retyped so, if at all pos- 
sible, use white paper and a fresh ribbon on your 
printer. If there's no way you can generate an 
Original source listing, then a handwritten source 
listing with MOS mnemonics, and labels of up to 
six characters, (don't forget to use labels when 
referencing zero page locations) will be satis- 
factory. Comments should be preceded by a semi- 
colon. 


This will make it easy for me to assemble 
your program for publication. Disassembler out- 
put is not very satisfactory except when heavily 
commented, labeled and all zero page registers 
identified by name, 


Perhaps the best-way to submit program source 
listings would be to send a cassette of the assgem- 
bler source file and I can then assemble it and 
run a listing on my Decwriter. I Can assemble 
source files from either the Micro-ade assembler 
(Peter Jennings) or the MOS/ARESCO/HDE assemblers. 
If you send a S.A.S.E.,I1'1l1l return your cassettes. 
It would be wise to dump two copies of the file to 
cassette just in case. 


I can read most of the Hypertape-recorded cas- 
settes I receive once I adjust the azimuth of the 
cassette head for the highest audio level while 
reading the program. I think this head adjustment 
problem has probably accounted for most of the tape 
interchange problems I've been aware of. The ma- 
chines I use to make the newsletter cassettes have 
been adjusted as close as possible and 30 seconds 
of synch characters precede the program for set- 
ting up your equipment. So far, we have not had 
any cassettes returned, so we must be doing some- 
thing right. 
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BACK ISSUE AVAILABILITY 


"Official" reprints of USER NOTES 1-12 are 
now available from Mark Kantrowitz, 15 Midway Ct., 
Rockaway NJ 07866. Prices are $5.00 for issues 
1-6 or 7-12 (lst Class in N America)- $10.00 for 
issues 1-12 (lst Class in N America)= $13.00 for 
issues 1-12 (overseas) U.S. Funds only. 


LET THE BUYER BEWARE! ! 


Those of you who have been around this indus- 
try for awhile know by now that just ‘cuz some- 
things BAverE sae doesn't mean that it really ex~ 
ists. 


I am very interested in hearing about your 
experiences with any of the advertisers in USER 
NOTES. 


When purchasing hardware or software, it makes 
alot of sense to purchase the documentation ahead 
of time to see what you're getting into. The qual- 
ity of documentation can, prove to be a good indi- 
cator of the company's performance in other areas 
pertaining to that product. 


On the other hand, do be reasonable, Don't 
expect a 60 page manual to accompany a $5 or $10 
software package. I'm really referring to prod- 
ucts of medium or high complexity such as some As~ 
semblers or high-level languages, floppy-disc 
drives, prom programmers, video boards etc. 


For instance, are there detailed instructions 
for getting the product running on your system? 
Does the product need some non-standard hardware 
or software? Are there enough examples to make 
operation fairly straightforward? What if you have 
problems? Are there some trouble shooting hints 
in the manual? How ‘bout a phone number to call if 
you have problems which you can't handle? For i- 
tems which may cost from several hundred to sever- 
al thousand dollars, it would be a good idea to 
call the company with some real or made-up ques- 
tions just to see what kind of response you get. 


Are you treated courteously? Do you get con- 
nected to someone who can answer your question? 
(If. the right person doesn't happen to be in the 
office when you call, don't expect them to return 
a long distance call.) 


It can get pretty lonesome out there when 
you've got a product that isn't performing and a 
company that ignores you. It's better to find out 
in advance how a company treats its customers. If 
something breaks, how will they back you up? 


When you shop around for something big (like 
a floppy, for example) you should understand that 
price alone should not be THE determining factor, 
Other things to consider include: What kind of 
software comes with it? Will it interface easily 
with the particular high-level language I will want 
to use? What kinds of software can be used with 
it-any optional packages from the manufacturer? 
Can I interface the floppy system easily to some 
non-standard hardware I may want to add? How easy 
will it be to incorporate some improved software 
which gets released at a later date from the man- 
ufacturer? 


(RAM based software that is brought in by 
means of a simple bootstrap program is generally 
much easier to upgrade than a ROM based operating 
system). Can the system software be backed-up on 
an extra disc? What will the manufacturer be of- 
fering in the next year or so? Do his plans sound 
reasonable? What else has he done? Past perfor- 
mance generally indicates future performance. If 
you're looking for the "cheapest" product-keep in 
mind that the manufacturer of the "cheapest" pro- 
duct probably can't afford to support his product 


next year. IJNVESTIGATE FULLY BEFORE YOU BUYIIE!!! 


KIMSI USERS 


Apparently Forethought Products, makers of 
KIMSI, have given up any plans to put out a news- 
letter of KIMSI information. I know there are alot 
of you out there so how ‘bout if we have a section 
of USER NOTES just for you? 




















SOFTWARE FEATURES 
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Jim Zuber 
20224 Cohasset #16 
Canoga Park, Ca 91306 


If your KIM, SYM, or AIM system is hooked up 
to a printer or teletype get ready to have some 
fun! In the January 1979 issue of Kilobaud there 
was an article on page 64 called "Say it with Ban- 


The program treats a carriage return 
take note. You terminate the text 
input with an @, If you typed in all valid charac- 
ters you will see "@ o k" printed, Get your paper 
ready and type a carriage return to start the 
printing. If you type an illegal character you 


printed out, 
as a space s0 


ner", This program prints out giant characters on : " “oe : ; 

your printer, There were three problems with the will see “@ with the tllegal characters sand- 

program: wiched between the @ and the Retype the text 
using only legal characters. At the end of the 


ls It is written in 8080 code. 


printout the program will prompt for more text. 


2. It uses octal notation, 

3. It uses almost 8K of memory. The legal characters are A thru Z, 0 thru 9, space, 
c/r, and the following characters: * , ~ +: ! 3; ? 
Ss; e My characters are 10 rows by 35 columns. 


I took the general concept of printing large 
characters and wrote an orginal program that has 
the following features: 

1. Written in 6502 code. 

1/0 independent, 
Uses HEX notation. 
Only uses 2K of memory. 
» Relocatable data tables. 
Easy user modification of character sets, 


Ame wn 
c >. a @ 


Let's talk about the 1/0 configuration first. 


Obviously this is too big for the AIM printer, 
Don't worry, you can make up your own character set 
to work on the AIM. To create your own character 
set just follow these simple rules: 
1. Always store ff at the end of the 
tables. 
2. The first BYTE should be the HEX 
equivalent of the ASCII character. 
3. The second BYTE should be the HEX 
number of data Bytes. 


Location 2004 and 2005 defines the Input character 4. Carriage returns are defined by EE. 
routiue location for your system. If your terminal co BLOEE ENE eee Of eS Gharae 
echos your input change 2003 to 4C. The character 6 Pag Se eat eee Se ee Sipe ey 
output routine location for your system is defined : aaa cei ngs ye ee en 
: ‘ y Bi elng se o zero an 
by ab aera te pa 2008% Your output routine thru 6 set to the number of spaces 
Bet ee i Pesviae a line feed if necessary bie cage Bee Beeap hers Chae 
. 5 : : print 7 spaces, 
2. Provide null characters if neces~ 7. To print a mark (or a character) set 


sary. 
Must preserve the X, 
ulator registers. 


a Y, and accum- 


Text can be stored anywhere in memory and is 
defined by locations 200C and 200D. The text string 
can be as long as you want as long as you don’t run 
out of memory. The data tables can be stored any- 
where in memory as long as the starting address of 
the tables is stored in 2009 and 200A. SYM users 
will want to store the tables right after the pro- 
gram. The print character is defined in location 
200B. Use the HEX equivalant of the ASCII charac- 
ter you want. The program is set up to use an @. 

I will explain later on how to make up your own 


Bit 7 to one and Bits 0 thru 6 set to 
the number of marks. Example: 87 
would print 7 @'s. 


Maybe this will help you understand a little 
better. In order to print an "1" (one) that is 15 
columns by 7 rows wide, just put this in the tables: 
31 OA EE EE BF EE 8F EE 8F EE EE EE. The 31 is the 
HEX equivalent of ASCII character one. The OA is 
the number of data Bytes. Then I print 2 carriage 
returns, 3 rows of 15 characters and 2 more car- 
riage returns. Hope you enjoy this program. If 
you want to modify any of my characters you can 
find their location by storing the character in 
0004, then call the find character subroutine. 





characters or modify some of the ones I made up. The character's location plus 2 will be stored in 
To use the program start at 2000 and GO. You will 0000 and 0001. 
see a prompt (J? ). Type in the text you want 
0010 2000 SKIM~1 BANNER PROGRAM 
0015 2000 SWRITTEN BY JIM ZUBER 12/23/78 
0020 2000 
0025 2000 x=$0 
0030 0000 PNTL xuk+1 
0035 0001 FNTH k=k+) 
0040 0002 BUF 1 x=axk+] 
0045 0003 BUF 2 xek+) 
0050 0004 TEMP Kaxk+1 
0055 0005 TEMPX k=k+1 
0060 0006 TEMPY k&=k+1 
0065 0007 
0070 0007 sKIM I/0 
0075 0007 GETCH =$1E5A 
00B0 0007 OUTCH =$1EA0 
0085 0007 CRLF =$1E2F 
0090 0007 
0095 0007 EOS =$40 yEND OF STRING CHAR 
0100 0007 
0105 0007 *x=$2000 
0110 2000 4C OE 20 STAR JMP OVER 
0115 2003 4C 2C 21 INV JMP INPT FINPUT ROUTINE 
0120 2006 4C 34 21 OUTY JHP OUTC *OUT VECTOR 
0125 2009 00 TBLL »BYTE $00 +TABLE LOW 
0130 200A 30 TBLH «BYTE 827 22 3TABLE HIGH 
0135 200B 40 PRCH eRYTE $40 sPRINT CHAR 
0140 200C 00 BUFL .BYTE $96 50 +BUFFER LOW 
0145 2002 40 BUFH «BYTE $9 21 *PRUFFER HIGH 
0150 200E 
0155 200E D8 OVER CLD 
0160 200F AO 00 LDY #0 
0165 2011 20 FA 20 JSR INTB fINPUT TEXT 
0170 2014 A? SE LDA ¢’> sFROMPT CHAR 
0175 2016 20 06 20 JSR OUTYV 
0180 2019 20 06 20 JSR OUTY 
0185 201C A9 OD LDA #$0D *SEND A CR page 1 
0190 201E 20 06 20 JSR OUTY 


08888288068888808888008880080088506 
88008886888 888888886808888888808880 
8822065088808888800880088088888880608 


82e82 88668 
88888 88888 
68888 88866 88680 
86888 86888 88088 
85608 86668 86888 
08608 86008 86868 
80066 68668 88088 


908808888880 888888888088888888080806 
0980088888888 8880808088 888888880808 
080888880608088808086888080680888886 


§600888208 8666800 86 6060 686688800888 
88088 888888880600 08888888888 80880008 


886888088 
888888668 
888868888 
688668808 
6860806088 


0808066868 
8008808880808 88888888888880888080888 


098688808820000888868888808888080888 


888808088 
688800886 
888088688 
888886808 
8806880008 


aaadaaada 
0800088888 888088808888 8088000800808 
08800900008 8808888088080860808880868 


88806808808888680880868888800888058 
86860888888 800860000088888088688088 
86888008808 888888888888088888880088 


888086 88888 
886688 68888 
686080 66068 
88808 86880 


8880800080880 000800080008888888888806 
00060008088888000088880808880585808 
880800880800000068080088888886088808 


880000080608 086898800688 
86005008 a0000 8688660866668 
000008 800088886800808886800888880 


68680 00880 868686 
08008 88000 88888 
020000 88888 88066 
8a0dda 86806 80806 


98980080000 008600008008088880860008 
80988804 8888000008880008080800880008 
200000878008 88880888000000880808080088 


page 2 


2021 
2024 
2026 
2026 
202A 
202D 
2030 
2033 
2035 
2037 
2039 
203B 
203D 
2040 
2042 
2044 


2046 
2049 
204C 
204F 
2052 
2054 
2057 
2059 


—6205C 


205E 
2061 
2064 
2067 
2069 
206B 
206D 
206F 
2072 
2074 
2077 
207A 
207C 
207F 
2082 
2085 
2088 
208B 
208B 
208D 
208F 
2091 
2093 
2095 
2098 
209B 
209D 
209F 
20A1 
20A3 
Z20A5 
20A8 
20A9 
20AB 
20AE 
20BO 
20B2 
20B3 
20B6 
20B9 
20BA 
2OBC 
20BF 
20C0 


20C2 
20C5 
20C8 
20C9 
20C9 
20cc 
20CE 
20D0 
20D2 
20D4 
20D4 
20D8 
20D9 
20DB 
20DC 
20DE 
20E.0 
20E2 
20E4 
20E46 
20E9 


6 20EC 


20EF 


03 20 


10 21 
21 20 
FA 20 


C9 20 


06 20 
00 20 
10 21 
33 20 
06 20 
06 20 
06 20 


03 20 
FA 20 


06 20 
BF 20 


AZ 20 


OB 20 
06 20 


BS 20 


1E 21 
BB 20 


05 21 


CHAR 


CHEK 
LOPS 


LOP4 


LOFS 


LOP7 


PNTC 


LP10 


LP11 


MARK 


LP1i2 


STOP 


-LP13 


FDCH 
LOP1 


OUT 


J5BR 
STA 
CMP 
BEQ 
J&R 


J&R 
LDY 
LDA 
CMP 
BEQ 
STA 
J&R 


BNE 


LDA. 


JSR 
JMP 
JSR 
JMP 
LDA 
JSR 


JSR 
LDA 
JSR 
JSR 
JSR 
LDY 
LDA 
CMF 
BNE 
Jap 
STA 
JSR 
JSK 


JSR 
JSR 
JSR 
JSR 
JF 


LDY 
LDA 
CMP 
BNE 
LDA 
JSR 
JMP 
STA 
AND 
BNE 
LDY 
LDA 
JSR 
DEY 
BEQ 
JP 
LDA 


TAY 
LDA 
JSR 
DEY 
BEQ 
JMP 
DEX 
BEQ 


JSR 
JMF 
RTS 


JSR 
LOY 
LDA 
CMP 
BEQ 
CMP 
BEQ 
INY 
LDA 
CLC 
ADC 


STA. 


LDA 
ADC 
STA 
JSR 
JSR 
JP 
RTS 


INV 

(BUF LD» Y 
#E05 : 
CHEK 
INCB 
CHAR 
INTB 

#0 

(BUF 1>,7Y 
#E08 

OK 

TEMP 
FDCH 
OSFF 
LOP4 
TEMP 


OUTY 
STAR 
INCB 
LOFS 
#’0 
OUTYV 
$’K 
OUTY 
#$0D 
OUTY 
INV 
INTB 
#0 
(BUF 1)97Y 
#E0S 
LOP7 
STAR 
TEMP 
FDCH 
PNTC 
#$0D 
OUTY 
OUTY 
OUTY 
INCB 
LOP6 


#0 
CPNTL) v9 ¥ 
#¢EE 
LP10 
#¢0D 
OUTY 
STOP 
TEMP 
#¢80 
MARK 
TEMP 
#$20 
OUTY 


STOP 
LP11 
TEMP 
#$7F 


#INPUT STRING 


SEND OF STRING? 


§CWECK CHARS 


SEND STRING? 


sFIND CHAR 
$I1S IT BAD? 


sSTART OVER 


SPROMPT “OK" 


pWAIT FOR KEY 
sREADY TO PRINT 


SEND? 


*7FIND CHAR 
§$PRINT IT 
73 ROWS 


SINC BUFFER 


#PRINT CHAR 
# SUBROUT INE 
TIME TO CARRIAGE RETURN? 


sOUTPUT C/R 


§GET DATA 
§MARK OR SPACE 


‘MUST BE SPACE 
sOUTPUT SPACE 


SANY MORE? 
MUST BE 
‘MUST BE MARK 
sMASK BIT 7 


PRCH GET PRINT CHAR 


OUTY 


STOP 
LP12 


LP13 


INCP 
PHTC 


INTP 

$0 
(PNTL)2Y 
#SFF 

OUT 

TEMP 
OUT2 


(PNTL) *¥ 


PNTL 
PNTL 
#0 

PNTH 
PNTH 
INCP 
INCP 
LOF2 


#OUTPUT MARK 
#ANY MORET 


sMUST BE 
‘CHECK END 


sINC POINTER 
7GO BACK 


>FIND CHARACTER 

* SUBROUI TNE 

*FICK UP ILLEGAL? 
SRIGHT ONE? 


*>MUST NOT BE 
?>BYTE COUNT 


sADD TO POINTER 


sLOOK AGAIN 











0655 20FO0 20 1E 21 OUT1 JSR INCP 
0660 20F3 Bi 00 LDA (PNTL)rY 


*LOOK AT DATA 











0665 20F5 AA TAX sBYTE IN X 

0670 20F6& 20 1E 21 JSR INCP 

0675 20F9 60 RTS 

0480 20FA 

06853 20FA AD OC 20 INTB LDA BUFL Ss INITIALIZE 

0690 20FD 85 02 STA BUFI IBUFFER SUB 

6695 20FF AD OD 20 LDA BUFH 

0700 2102 85 03 STA BUF2 

0705 2104 60 RTS 

0710 2105 

0715 2105 AD 09 20 INTP LDA TBLL INITIALIZE 

0720 2108 85 00 STA PNTL sPGINTER SUB 

0725 210A AD OA 20 LDA TBLH 

0730 210D 85 01 STA PNTH 

0735 210F 60 RTS 

0740 2110 

0745 2110 18 INCB CLC > INCREMENT 

0750 2111 AS 02 LDA BUF 1 *BUFFER SUB 

0755 2113 69 O1 ADC #$¢1 

0760 2115 85 02 STA BUF1 

0765 2117 AS 03 LDA BUF2 

0770 2119 69 OO ADC #0 

0775 211B 85 03 STA BUF2 

0780 211D 60 RTS 

0785 211E 

0790 211E 18 INCP CLC i INCREMENT 

0795 211F AS 00 LDA PNTL 

0800 2121 649 O1 ADC #1 sPOINTER SUB 

0805 2123 85 00 STA PNTL 

0810 2125 AS5 O1 LDA FPNTH 

0815 2127 69 00 ADC #0 

0820 2129 85 Ol STA PNTH 

0825 212B 60 RTS 

0830 212C 

0835 212C 84 06 INPT STY TEMPY s#SAVE Y 

0840 212E 20 SA 1E JSR GETCH #GET A CHAR 

0845 2131 A4 06 LDY TEMPY 

0850 2133 60 RTS 

0855 2134 

08460 2134 48 OUTC PHA sSAVE CHAR 

08465 2135 86 O5 STX TEMFX sAND X AND Y 

0870 2137 84 064 STY TEMPY . 

0875 2139 C9 OD CMF #$0D2 7IS IT A C/R? 

0880 213B 020 06 BNE CONT 

0885 213D 20 2F 1E JSR CRLF 

0890 2140 4C 46 21 JMP RESTOR §GET BACK THE REGS AND RETURN 

0895 2143 20 AO 1E CONT JSR GUTCH SOTHERWISE USE KIM OUTFUT. 

0900 2146 Aé 05 RESTOR LDX TEMPX 

0905 2148 A4 06 LDY TEMPY 

0910 214A 68 PLA S$RETORE THE ACC. 

0915 214B 60 RTS SAND RETURN 

0920 214C FINISH .END 
2200 20 O7 EE EE EE EE EE EE EE 41 20 A EE AS EE A3 2400 84 EE 84 1B 84 EE A3 EE AZ EE 50 23 AZ 
2210 EE OF 85 OA 85 EE OF 85 OA 85 EE OF 85 OA B85 EE 2410 A3 EE 11 85 08 85 EE 11 85 08 85 EE 11 
2220 OF 85 OA 85 EE AS EE AZ EE AS EE 42 2B AS EE AS 2420 EE 11 85 08 85 EE 11 92 EE 11 92 EE 11 
2230 EE AS EE 85 OA 85 OA BS EE 85 OA 85 OA B5 EE BS 2430 20 A3 EE AZ EE 84 1B 84 EE 84 1B 84 EE 
2240 OA 85 OA 8S EE 85 OA 85 OA 85 EE O01 Al EE OS St 2440 EE 84 02 84 15 84 EE AS EE AS EE 04 84 
2250 O03 BD EE 04 8B 05S 8B EE 43 22 AZ EE AS EE AS EE 2450 EE S32 21 A3 EE AZ EE AS EE 11 85 08 B5 
2260 85 19 85 EE 85 19 85 EE 85 19 85 EE 85 19 85 EE 2460 O8 85 EE 11 85 08 85 EE 96 08 85 EE AZ 
22700=Cfs« 8B:«13«o88 «EE 6 BBS 13 88 EE 88 13 88 EE 44 1F AS EE 2470 EE 11 92 EE 53 36 04 81 OF 8B EE 03 82 
2280 A3 EE AS EE 85 19 85 EE 85 19 85 EE 85 19 B85 EE 2480 01 84 OD 90 EE 85 OB 85 09 85 EE 85 OB 
2290 85 19 85 EE 02 9F EE 03 9D EE 04 9B EE 45 20 AS 3490 EE 85 OB 85 09 85 EE 85 OB 85 09 85 EE 
2200 EE AZ EE AS EE 85 OA 85 OA 85 EE 85 OA 85 OA B85 24A0 84 EE 03 SF OC 82 EE 04 8D OD 81 EE 54 
2280 EE 85 OA 85 OA 85 EE 85 OA B85 OA BS EE BS OA 85 24B0 65 EE 1£ 85 EE 1E 85 EE AZ EE AZ EE A 
22?co 0 OA 85 EE 85 19 85 EE 85 19 85 EE 46 25 AZ EE AS 24CO EE 1E 85 EE 1£ 85 EE 55 14 AZ EE AZ EE 
22nO0 EE AS EE OF 85 OA 85 EE OF 85 OA 85 EE OF 85 OA 24D0 EE 85 EE 85 EE 85 EE AZ EE AZ EE AZ EE 
227EO 85 EE OF 85 OA 85 EE OF 85 OA 85 EE 1E 85 EE 1E 24EO 6B EE 11 BA EE OB 89 EE 05 89 EE 88 EEF 
°2FO 85 EE 47 26 AS EE AS EE AS EE 85 19 85 EE 85 19 24FO 89 EE OB 89 EE 11 8A EE 18 8B EE 57 18 
2300 85 EE 85 08 84 OD 85 EE 85 08 84 OF 85 EE 91 OA 2500 EE 8A EE 07 8D EE 11 92 EE 11 92 EE 07 
2310 988 EE 91 OA 88 EE 91 OA 88 EE 48 18 AS EE AS EE 2510 EE AS EE AZ EE 58 2C 88 15 86 EE 05 86 
2320 AZ EE OF 85 EE OF 85 EE OF 85 EE OF 85 EE AS EE 2520 08 B84 O09 846 EE OB 846 O03 86 EE OE 89 EE 
2330 A3 EE A3 EE 49 1F EE 85 19 85 EE 85 19 85 EE 85 2530 OB 86 O23 86 EE 08 86 09 86 EE 05 86 OF 
2340 19 85 EE AS EE AS EE AS EE 85 19 85 EE 85 19 85 2940 15 846 EE 59 1C 1A 89 EE 17 88 EE 14 86 
2350 EE 85 19 85 EE 4A 1A 04 87 EE 03 88 EE O02 89 EE 2550 EE 94 EE 94 EE 12 85 EE 14 86 EE 17 88 
2360 84 EE 84 EE 84 EE 84 EE 02 Al EE 03 AO EE 04 9F 25460 EE SA 34 86 18 85 EE 89 15 85 EE 85 O01 
2370 EE 4B 2A A3 EE AS EE OF 85 EE OF 84 OL 84 EE OR 2570 EE 85 04 86 OF 85 EE 85 07 86 OC 85 EE 
2380 84 05S 84 EE 09 84 09 84 EE 07 84 OD 84 EE OS 84 2580 O9 85 EE 85 OD 86 06 85 EE 85 10 86 O23 
2390 11 84 EE 03 84 15 84 EE 01 84 19 84 EE 4C 14 A3 2590 13 8B EE 85 16 88 EE 30 1C AZ EE AZ EE 
23A0 EE A3 EE A3 EE 85 EE 85 EE 85 EE 85 EE 85 EE 85 25A0 19 85 EE 85 19 85 EE 85 19 85 EE 85 19 
23B0 EE 85 EE 40 18 AS EE AS EE 17 8C EE OC SE EE &F 29BO EE A3 EE A3 EE 31 OD EE EE EE A3 EE AS 
23C0 EE SF EE OC SE EE 17 8C EE AZ EE AS EE 4E 19 AS 25C0O EE EE EE EE 32 30 94 OA 85 EE 94 OA 85 
23n0 EE AS EE 1A 89 EE 13 8A EE Of 89 EE OD 89 EE 06 2500 85 EE 85 OA 85 OA 85 EE 85 OA 85 OA 85 
2360 89 EE 89 EE A3 EE AS EE 4F 20 AS EE AS EE 84 1B 25E0 85 OA 85 EE 85 OA 85 OA 85 EE 85 OA 94 
23F0 84 EE 84 1B 84 EE 84 1B 84 EE B84 1B 84 EE 84 1B 25FO 94 EE 85 OA 94 EE 33 30 B85 OA 85 OA B5 


>, ; 
iy S30 wr 


Py 


3400. A OA 85 OA 85 ma0 95 EE OF 85 EE 05 99 EE 05 99 EE 05 99 EE OF 85 
3410 ae oa pa ae fe oe os 4 ae ae ae EE 85 0A 85 Ae 3590 EE OF 85 EE OF 85 EE 3A 16 EE EE EE EE 05 85 OD 

3420 9% EE AZ EE AZ EE AS EE 34 1B 10 93 EE 10 93 EE 35A0 85 EE 05 85 OD 85 EE 05 85 OD BS EE EE EE EE 21 

3430 10 93 EE 10 85 EE 10 85 EE 10 85 EE AZ EE AZ EE 35BO 13 EE EE EE EE 85 03 9B EE 85 03 9B EE 85 O38 9B 

3440 A3 EE 10 @5 EE 35 30 85 OA 94 EE 85 0A 94 EE 85 35CO EE EE EE EE 3B 16 EE EE EE EE 05 85 OF 85 EE 04 

3450 OA 94 EE 85 0A 85 OA 85 EE 85 OA 85 OA 85 EE 85 35D0 986 OF 85 EE 02 86 OE 85 EE EE EE EE 3F 27 17 8C 

3460 OA BS OA 85 EE 65 OA 85 OA 85 EE 94 0A 85 EE 94 35EO EE 17 BC EE 17 BC EE 1E 85 EE 85 02 BB OC BS EE 

3470 OA 8S EE 94 OA BS EE 36 2A AZ EE AZ EE AZ EE 85 35FO 65 02 BB OC 85 EE BS 02 BB OC 85 EE OD 76 EE OD 

3480 08 85 0C 85 EE 85 08 85 OC 85 EE 85 08 B65 OC 85 _-x*vtae. Saves PSH 
3490 EE 85 08 65 OC 85 EE 92 OC 85 EE 92 OC 85 EE 92 Fe. Ag 

34A0 OC 65 EE 37 1B 1B 98 EE 1B 6B EE 1B 88 EE 1E 85 

34BO EE i£ 85 EE 1E 65 EE 1E 85 EE A3 EE AS EE AZ EE 3620 EE 02 85 08 85 08 85 EE 02 92 08 B85 EE 02 92 08 

34CO 36 24 AS EE AZ EE AZ EE 85 0A 85 OA 85 EE 85 0A 3630 85 EE 02 92 08 85 EE 2C OF EE EE EE EE 03 85 EE 

34D0 85 OA 85 EE 85 0A 85 OA 85 EE 85 OA 85 OA 85 EE 3640 02 B46 EE 88 EE EE EE EE 28 16 EE EE EE EE AS EE 

34EO AZ EE AS EE AS EE 39 23 11 92 EE 11 92 EE 11 92 3650 AS EE AZ EE 85 19 a ic ae od aa is fe aE ie = 

3660 29 16 85 19 85 EE 
i RS Ree ie) ee ee reer ee ge eee eg te See eer a 3670 AS EE AS EE EE EE EE EE FF CD 00 40 SE 40 CO 30 


$800 11 65 08 85 EE AZ EE AS EE AS EE OD O7 EE EE EE 3680 4E 1A 40 40 CF 75 C4 B2 4F 6F 46 00 S56 76 06 00 
3310 EE EE EE EE 2h 34 EE 09 82 06 82 O06 82 EE OB 82 3690 96 75 52 40 DF Cé 76 AO GE 77 04 42 SF FF Cé 80 


3520 04 82 04 62 EE OD 8? 02 G2 02 82 EE OF 86 EE 0F 36A0 15 3E 40 44 57 F4 07 37 FS 4F 40 04 6B EE E7 02 
3530 92 EE OF 86 EE OD 82 02 82 02 82 EE OB 82 04 82 36B0 F7 E2 40 30 86 37 C3 OS C7 76 62 O01 96 GF ES 62 
3540 04 82 EE 09 82 06 82 06 82 EE 2E OD EE EE EE EE 36CO 47 SD 44 O1 76 23 04 61 47 D3 02 01 B2 JE 00 00 
3550 @5 EE 6S EE 65 EE EE EE EE 2D 1E OF 85 EE OF 85 36D0 97 Fé 12 AO F7 D7 40 00 97 SC B2 40 E7 F6 00 BB 
3360 EE OF 85 EE OF 65 EE OF 85 EE OF 85 EE OF 85 EE 36E0 B7 64 44 21 BA OE 02 O01 OF FD OO O1 AY C1 00 OO 
3570 OF @S EE OF @5 EE OF 85 EE 2B 1C EE OF 85 EE OF 36FO FF FE 06 CO 76 FS Cé DO FF Dé 00 40 A7 FC 42 40 





EDITORS NOTE: The didsassembler program wars orig- The Address and Object Code columns are the 

dAnakky waitten for the Apple and appeared in Doc- standard listings for the program under scrutiny. 

torn Dobbs Jourznal {Sept 76). It has been modified You will notice that the disassembler has arranged 

for KIM by Bob Kuatz and your editor. Bob Kurtz the code listing by one, two, or three byte com- 

wrote the articke., mands and has printed the address column accord- 
ingly. 


1 tm Se MSNA SN ISOC TTEN TSR ESE IT NETO T P 


The Source Code columns contain the MOS Tech- 





Bob Kurtz nology 650X Mnemonic abbreviations for the com- 
Micro~Z Co mand - and the Operand listing. The following is 
PO Box 2426 an explanation of the address mode for the various 
Rolling Hills Ca 90274 operands: 
PRELIMENARY: . Operand Address Mode 
The purpose of the disassembler is to take blank Accumulator, Implied 
any program that has been entered into memory in #53 Immediate 
the KIM-1, and to print-out an "object" code and 01 Zero Page 
a source” code listing of this program - to per- 01,X 01,Y Zero Page, indexed by X or Y 
mit analysis and modification, if desired. In a (7E),Y Indirect Indexed 
sense, it takes a completed program and recon- (7E,X) Indexed Indirect 
structs the assembly language format ~- or "dig- 1C64 Absolute of Branch 
assembles” the program. (1C64) Indirect 
1€064,X Absolute (indexed by X) 
The following is a sample of the print-out 1C64,Y Absolute (indexed by Y) 
format: 
PROCEDURE: 
Address Object Code Source Code 
1. toad the starting address of the program 
23BC- E8 ee INY to be disassembled into locations 0000 
23BD- AQ 53 LDA #53 (Low byte) and 0001 (High byte). 
23BF- 85 01 STA 01 
23C1 91 7E STA (7E),Y 2. Go to location 2000 
23C3- 4C 64 1C€ JMP 1C64 
3. Press “G" on terminal 
The "disagasembler™ will now print-out the 
yDISASSEMBLER PROGRAM FOR THE 6502 first 13 commands of the program under scrutiny. 
0020 2000 WRITTEN BY STEVE WOZNIAK & ALLEN BAUM At the end of this print-out, simply press "G" 
0030 2000 fAND FUBLISHED IN DOCTOR GORES JOURNAL again and the next 13 commands will be printed out, 
0040 2000 sSEPT 1976 Continuing to press "G" whenever the program stops, 
0050 2000 5 will step you through the entire program under in- 
0060 2000 vestigation, 
0070 2000 *=$0 
0072 0000 PCL K=Kt1 The program stops after each 13 commands. If 
0073 OO01 PCH K=K+1 you wish to modify this, change the byte in loca- 
0075 0002 COUNT x=x+1 tion 2010 from $OD (13 decimal) to any number up to 
0080 0003 FORMAT x=x+1  $FF (256 decimal). 
0090 0004 LENGTH x=x+1 
0100 0005 LMNEM x=xk+t1 If portions of the disassembled program do not 
0110 0006 RMNEM xX=xk+1 appear to make sense, these may be "look-up" tables 
0142 0007 YSAVE =xKt+1 within the program. As an example, the disassem- 
0150 06008 , bler can be used to "disassemble" the disassembler 
0160 0008 *KIM I/O TO FOLLOW program! Addresses $2000 to $211A will print out 
0170 0008 PRTBYT =$1E3B properly since these contain the body of the pro- 
0180 0008 OUTCH =$1EA0 gram commands. However, locations $211B to $21F9 
0190 0008 CRLF =$1E2F contain the tables for all the mnemonics and sym~ 
0191 0008 CLEAR =$1C64 bols and will print-out gibberish. 
0192 0008 OUTSF =$1E9E | 
0200 0008 ’ 
0210 0008 *=$2000 @ 
0211 2000 20 OF 20 START JSR RSMBL ji 
0212 2003 20 9E 1E JSR OUTSF 
0213 2006 20 9E 1E JSR OUTSF 
0214 2009 20 9E iE JSR OUTSF 
0215 200C 4C 64 1C JMF CLEAR 
0220 200F A9 OD DSMBL LIMA #13 sCOUNT FOR 13 INSTR. ESMBLY. 
0230 2011 85 02 STA COUNT 
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0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 


0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
05860 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 
0720 
0730 
0740 
0750 
0740 
0770 
0780 
0790 
0800 
0810 
0820 
0830 
0840 
0850 
0840 
0870 
08680 
0890 
0900 
0910 
0920 
0930 
0940 
0950 
0960 
0970 
0980 


0990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 


2013 
2016 
2019 
201B 
201D 
201F 
2021 

2024 
2026 
2027 
2028 
202A 
202B 
202D 
202F 
2031 

2033 
2035 

2036 

2037 

203A 
203C 


203D 
203E 
203F 
2040 
2042 
2044 
2046 
2048 
2049 
204C 
204E 
2050 
2052 
2053 
2055 
2056 
2057 
2059 
205B 
205D 
205E 
2060 
2061 
2062 
2064 
2065 
2067 
2068 
2069 
206B 
206C 
206E 
2071 
2073 
2076 
2078 
2079 
207B 
207D 
207F 
2081 
2082 
2083 
2086 
2088 
208B 
2080 
208F 
2091 
2093 
2095 
2096 
2097 


2099 
209B 
209E 
209F 
20A1 
20A4 
20A6 
20AB8 
20AA 
20AC 
20AE 
2080 
20B2 
20B4 
20B6 
20B9 
20BA 


21 20 


FC 
00 
01 
02 
F2 
E2 
00 


03 
OB 


08 


79 
05 
B9 
06 
00 
OS 


05 


20 


20 


21 


21 


20 


DSMBL2 JSR 


INSTDS 


TEVEN 


RTMODE 
ERR 


GETFMT 


MNNDX1 


MNNDX2 


MNNDX3 


PROF 


PROPBL 


FRMN}. 


PRMN2 


PRADR1 


FRADR2 


JSR 
STA 
STY 
DEC 
BNE 
JSR 
LDA 
TAY 
LSR 
BCC 
LSR 
BCS 
CMP 
BEQ 
AND 
ORA 
LSR 
TAX 
LDA 


BCS. 


LSR 


LSR 
LSR 
LSR 
AND 
BNE 
LDY 
LDA 
TAX 
LDA 
STA 
AND 
STA 
TYA 
ANT 
TAX 
TYA 
LDY 


BEQ 
LSR 
BCC 
LSR 
LSR 
ORA 
DEY 
BNE 
INY 
DEY 
BNE 
PHA 
LDA 
JSR 
LDX 
JSR 
CPY 
INY 
BCC 
LDX 
CFY 
BCC 
PLA 
TAY 
LRA 
STA 
LDA 
STA 
LDA 
LY 
ASL 
ROL 
ROL 
DEY 
BNE 


ALC 
JSR 
DEX 
RNE 
JSR 
LUX 
CFX 
BNE 
LOY 
BE 
LDA 
CMF 
LDA 
BCS 
JSR 
DEY 
BNE 


 INSTDS 
PCADJ 
PCL 
PCH 
COUNT 
DSMBL2 
PRFC 
CPCL xX) 


A 
IEVEN 
A 

ERR 
#$22 
ERR 
$$7 
#$80 
A 


MODE +X 
RTMODE 
A 


A 

A 

A 

$6F 
GETFMT 
#$80 
#$0 


MODE2+X 
FORMAT 
#$3 
LENGTH 


#$6F 


#$3 
#$SA 
MNNEX3 
A 
MNNDIXS 
A 

A 

#$20 


MNNDX2 


MNNDX1 


(PCL) »Y 
PRBYT 
#$1 
PRBL2 
LENGTH 


PROF 
#$3 
#$4 
PROF RL 


MNEML» Y 
LMNEM 
MNEMR? Y 
RMNEM 
#$0 

#$5 
RMNEM 
LMNEM 

a 


PRMN2 


#$3F 
OUTC 


FRMN1 
PRELNK 
#46 
#63 
PRADRS 
LENGTH 
PRADRS 
FORMAT 
#$E8 
(PCL) + 
RELADR 
FRBYT 


PRADR2 


yDISASSEMBLE AND DISPLAY INSTR. 
*UPDATE PCL»H TQ NEXT INSTR. 


9;DONE FIRST 19 INSTR? 

yYES» LOOF. ELSE DSMBL 20TH. 
yFRINT PCLsH 

>GET OPCOLDE 

sEVEN/OLND TEST 
yTEST BIT 1. 
+XXXXXX11 INSTR. INVALID. 
910001001 INSTR. INVALID. 

sMASK 3 BITS FOR ADDRESS MOBE & 
;ADD INDEXING OFFSET. 

yLSR INTO CARRY FOR 

yLEFT/RIGHT TEST BELOW, 

,;INREX INTO ADDRESS MODE TABLE. 
;IF CARRY SET USE LSD FOR 
#PRINT FORMAT INDEX 


7IF CARRY CLEAR USE MSI. 


3MASK FOR 4-BIT INDEX. 

7$0 FOR INVALID OF CORES. 
sSUBSTITUTE $80 FOR INVALID OF» 
3SET PRINT FORMAT INDEX TO 0 


s INDEX INTO PRINT FORMAT TABLE. 
sSAVE FOR ADDRESS FIELD FORMAT. 


SMASK 2-BIT LENGTH. O=1-BYTE 
$1=2-BYTE» 2=3-BYTE. 

sOF CODE. 

sMASK IT FOR 1XXX1010 TEST. 
SAVE IT. 

;0P COLE TO ’A’ AGAIN. 


;FORM INDEX INTO MNEMONIC TABLE. 


¥1XXX1010 -» 00101XXX 


yXXXYYYOL ~-> 00111XXX 
yXXXYYY10 -> 00110XXX 
sXXXYY100 -* 00100XXX 


§XXXXXO0O0 -> OOOXXXXX 


*>SAVE MNEMONIC TABLE INDEX. 


;FRINT INSTR (1 TO 3 BYTES) 
s;IN A 12 CHARACTYER FIELD. 


sCHAR COUNT FOR MNEMONIC PRINT. 


sRECOVER MNEMONIC INDEX, 


yFETCH 3-CHAR MNEMONIC 
s(PACKELD IN TWO BYTES? 


sSHIFT S BITS OF CHAR INTO ‘A’. 


s(CLEAR CARRY) 


sAnL ’?’ OFFSET. 
,OUTFUT A CHAR OR MNEMONIC 


yOUTFUT 3 BLANKS. 
sCOUNT FOR 6 FRINT FORMAT BITS. 


sIF X=3 THEN FRINT AUDRESS VAL, 
*NO FRINT IF LENGTH=0. 


sHANDLE REL ADDRESSING MODE 
sSPECIAL (FRINT TARGET ADDR> 
+(NOT DISPLACEMENT ) 

$OUTPUT 1- OR 2- BYTE ADDRESS. 
*MORE SIGNIFICANT BYTE FIRST. 
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1160 20BC 06 03 PRADR3 ASL FORMAT §STEST NEXT FRINT FORMAT BIT. 








1170 20BE 90 OE BCC PRADR4 IF O» DONT PRINT 

1180 20CO BD 6C 21 LDA CHARI-~1+X ‘CORRESPONDING CHAR. 

1190 20C3 20 OB 21 J8R OUTC sOUTPUT 1 OR 2 CHARS. 

1200 20C& BD 72 21 LDA CHAR2-15X §(IF CHAR FROM CHAR2 IS Or 
1210 20C9 FO 03 BEQ PRADR4 DON’T PRINT IT) 

1220 20CB 20 OB 21 JSR OUTE 

1230 20CE CA PRADR4 DEX 

1240 20CF £560 DS BNE PRADR1 

1250 20D1 60 RTS sRETURN IF DONE 6 FORMAT BITS. 
1260 20D2 20 FF 20 RELADR JSR PCADJSS sFCLvH + DISPL + 1 TO ’A’r’Y’, 
1270 2005 AA TAX 

1280 20D6 €E8 INX 

1290 2007 DO 01 BNE PRNTYX § +1 TO ’XK’r’Y’. 

1300 20D9 C8 INY 

1310 20DA 98 FRNTYX TYA 

1320 20DB 20 13 21 PRNTAX JSR PREYT s;PRINT TARGET ADDRESS OF BRANCH 
1330 20DE 8A PRNTX TXA sAND RETURN 

1340 20DF 4C 13 21 JMP PREYT . 

1350 20E2 20 2F 1E PRPC JSR CRLF sOUTPUT CARRIAGE RETURN, 
1360 20E5 AS 01 LDA PCH 

1370 20E7 Aé 00 LOX PCL 

1380 20E9 20 DB 20 JSK PRNTAX sOUTPUT FCi.H 

1390 20EC A? 2D LDA #’- 

1400 20EE 20 OB 21 JSR OUTC FOUTPUT ’-’ 

1410 20F1 A2 03 PRBLNK LDX #$3 3BLANK COUNT 

1420 20F3 AY 20 PRBL2 LDA #’ 

1430 20F5 20 OB 21 PRBL3 JSR OUTC ,OUTPUT A BLANK 

1440 20F8 CA DEX 

1450 20F9 DO F8 BNE FRBL2 s3LOOP UNTIL COUNT =O 

1460 20FR 460 RTS 

1470 20FC AS 04 PCABJ LDA LENGTH $O21-BYTEr 1=2-BYTEr 2=3-BYTE. 
1480 20FE 38 PCABJ2 SEC 

1490 20FF A4 01 FCADJUS LDY PCH : 

1500 2101 AA TAX #TEST DISPL SIGN (FOR REL 
1510 2102 10 Oi RPL PCADJ4 §RRANCH). EXTEND NEG 

1520 2104 88 DEY yRY DECREMENTING PCH. 

1530 2105 65 00 PCADJ4 ADC PCL 

1540 2107 90 01 BCC RTS1 yPCL+LENGTH (OR DISFL) +1 TO ’A’, 
1550 2109 C8 INY *CARRY INTO ’Y’% (PCH) 

1560 210A 60 RTS1 RTS 

1561 210B 84 07 OUTC STY YSAVE 

1562 210D 20 AO 1E JSR OQUTCH 

1563 2110 A4 07 LDY YSAVE 

1564 2112 60 RTS 

1565 2113 84 07 PRBYT STY YSAVE 

1566 2115 20 3B 1E JSR PRTIBYT 

1567 2118 A4 07 LDY YSAVE 

1568 211A 60 RTS 

1570 2118B ’ 

1580 2118 ; 

1590 2118 yTHE TABLES FOLLOW--- 

1600 211B ; 

16190 211B 40 MODE «BYTE $407$27$457$37$N07$87$407E$97 E350 


16410 211C O2 

1610 211D 45 

1610 211E 03 

1610 211F BO 

1610 2120 08 

1610 2121 40 

1610 2122 09 

16190 2123 30 

1620 2124 *XXXXXXZO INSTRUCTIONS. 
1630 2124 22 eKRYTE $227$457$337$010 79879402897 S407 $2 7845 
1630 2125 45 

1630 2126 33 

1630 2127 DO 

1630 2128 08 

1630 2127 40 

146430 212A OF 

1630 212B 40 

1630 212C O2 

1630 2120 45 


1640 212E 7Z=O»r LEFT HALF BYTE 
1650 212E yZ=1» RIGHT HALF BYTE 
1660 212E 33 “HYTE $337$107€$8 7640789 7$407$27$457$R376N0 


14660 212F DO 
1660 2130 08 
1660 2131 40 
1660 2132 09 
1660 2133 40 
1660 2134 O02 
1660 2135 45 
1660 27136 B3 
1660 2137 ho 
1670 27138 08 «BYTE $87$407$97$07$227$447633,$D07 8807644 
1670 2139 40 
1670 213A 09 
1670 213R 00 
1670 213C 22 
1670 213D 44 
1670 213E 33 
1670 213F no 
1670 2140 sc 
page 6 1670 2141 44 











1680 
1680 
1680 
14680 
1680 
1680 
1680 
1680 
1680 
1680 
1690 
1690 
1690 
14690 
1690 
1690 
1690 
1690 
1690 
1690 
1700 
1700 
1700 
1700 
1700 
1700 
1710 
1720 
1720 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1870 
1870 


1870 
1870 
1870 
1890 
1890 
1890 
1890 
18970 
1890 
1700 
1910 
1910 
1910 
1910 
19710 
1910 
19710 
1910 
1910 
1920 
1920 
1920 
1920 
1920 
1920 
1920 
1720 
1920 
1920 
1930 
1930 
1930 
1930 
1930 
1930 
1930 
1730 


1930 — 


1940 
1940 
1940 
1940 
1940 


2198 
2199 


+BYTE $024$117$227$44,$337$0I02 $8C 2$44289H,»$10 


BYTE $227$44,¢$33°SD07 $87 $407 $9 27$102$227 $44 


»-BYTE $337 $D07$87¢4076927$62 


*YYXXXZO1 INSTRUCTIONS 
oRYTE $13 °878°8AP 


MODE2 .BYTE $0 yERR 
»BYTE $21 7 IMM 
»-BYTE $01 *Z-FAG 
BYTE $02 fABS 
»BYTE $0 *IMPL 
»~BYTE €80 sACC 
eBYTE $59 *(Z-PAG?X) 
-BYTE $4D ¥(Z-FAG) »Y 
-BYTE $11 *>Z-PAG?X 
»-BYTE €12 >ABS 2 X 
“BYTE $6 FABSe Y 
«BYTE €4A * (ABS) 
«BYTE $5 *>Z~FAGrY 
~-BYTE $1D eREL 


CHARI «BYTE $2C1$29»$2C1$237$287$41_ 


CHAR? «BYTE $597$027$587$007$07$0 


*XXXXX000 INSTRUCTIONS 
MNEML BYTE $10 *°$8A»$1C2$257S507S$8R,$1Br $Al y $90 


BYTE $8Ar$1D2$23,$9D,$8R>$10 2 $A1s$01 $295 919 


sHYTE $AE 2 $697 $A82 $197 $235$247S557S$1R 2 $23 


“BYTE $247$53*$19»$A1 $0 
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1950 219A §XXXYY100 INSTRUCTIONS. 

1960 219A 1A »-BYTE $1A»85H»85B,s $A5? $69 2$247$24 
19460 219B SB 

1960 219C SB 

1960 219D AS 

1940 219E 69 

1940 219F 24 

19460 21AQ0 24 

1962 21A1 #1XXX1010 INSTRUCTIONS 

1963 21A1 AE «BYTE SAE »$AE? SAB» S$AlIs $29%$07$70 780 


1963 21A2 AE 
1963 21A3 AB 
1963 21A4 AD 
1963 21A5 29 
1963 21A6 00 
1963 21A7 7C 
1963 21A8 00 
1964 21A9 gXXXYYY10 INSTRUCTIONS 
1965 21A9 15 oRYTE $15789CrS$6Dr $9C rp FAS 2 $697 $29 2353 
1965 21AA 9C 
1965 21AB 6D 
1965 21AC 9C 
1965 21An AS 
1965 21AE 69 
1965 21AF 29 
1965 21BO $533 
1970 21B1 #XXXVYO1 INSTRUCTIQNS. 
1980 21B1 84 »BYTE $847$137$34>$1178A57$692$2357$A0 
1980 21B2 13 
1980 21B3 34 
1980 2184 11 
1980 2185 AS 
1980 21Bé6 69 
1980 21B7 23 
1980 21R8 AO 
1990 21B9 ¥XXXXXO00O INSTRUCTIGQNS. 
2000 21B9 U8 MNEMR .RYTE $D8r%627$5A> $48 7261 $627894>$88 
2000 21BA 62 
2000 21BB 5A 
2000 21BC 48 
2000 21BD 26 
2000 21BE 62 
2000 21BF 74 
2000 21C0O 88 
2010 21C1i 54 »-BYTE $547$44;%C8»$547%9687$447$E8 »$947$0 7884 
2010 21C2 44 
2010 21C3 C8 
2010 21C4 54 
2010 21C5 48 
2010 21C& 44 
2010 21C7 E8 
2010 21C8 94 
2010 21C9 900 
2010 21CA B4 
2020 21CK 08 ~-BYTE $8¥%$84,»%74,%H4>%$28>86E>%7458F4/¢CC»$4A 
2020 21CC 84 
2020 21CD 74 
2020 21CE k4 
2020 21CF 28 
2020 21D0 6E 
2020 2101 74 
2020 21D2 F4 
2020 2103 CC 
2020 21D4 4A 
2030 2195 72 oKRYTE €$722%F228A4s$B8A 
2030 21D4 F2 
2030 2107 A4 
2030 21D8 8A 
2040 21D9 #XXXYY100 INSTRUCTIONS. 
2050 21D9 00 BYTE 0+ 8AA> $A2 7 $A2 2$747$747$747S72 
2050 21DA AA 
2050 21DR A2 
2050 21DC A2 
2050 21nn 74 
2050 21DE 74 
2050 210F 74 
2050 21£O 72 
2060 21E1 #1XXX1010 INSTRUCTIONS. 
2070 21E1 44 -RYTE $447$68>8B27$3278R27907 $22 780 
2070 21£2 68 
2070 21E3 &2 
2070 21E4 32 
2070 21E5 &2 
2070 21£6 00 
2070 @1E7 22 
2070 21E8 00 
2080 21E9 #XXXYYY10 INSTRUCTIONS. 
2090 21E9 1A eRYTE $1A42€$1A7$267$267%727%725%8B8,8C8 
2090 21EA 1A 
2090 21EB 26 
2090 21EC 26 
2090 21ED 72 
2090 21EE 72 
2090 21EF 88 
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2100 21F1 


*XXXYYYO1 INSTRUCTIONS 


2110 21F1 C4 +KRYTE $045 $CAr$261$481 $44) $445¢A2-86C8 


2110 21F2 CA 
2110 21F3 26 
2110 21F4 48 
2110 21F5 44 
2110 21F& 44 
2110 21F7 A2 
2110 21F8 C8 


2120 21F9 FINISH .END 


CHECK-OUT 
by Robert D. Larrabee 
18801 Woodway Drive 
Derwood, MD 20855 


Did you ever want to check~out a new program 
without having to continually hit the plus key of 
your KIM? Did you ever wish you could back-up a 
byte or two? Pid you ever want to add some mater- 
lal in the middle of a program without having to 
reenter all of the succeeding bytes? If you ever 
did, program CHECK-OUT is for you! 


Load this program into the stack page, push 
the PC key to enter the starting address (0100), 


The C key Creates spaces for additional bytes 
in a program by moving the program material down 
from the displayed address one unit each time the 
C key is depressed. The byte displayed and all 
following bytes are moved down and the created 
space at the displayed address is filled with zeros. 
The D key Deletes the displayed byte by moving up 
all the following program material one unit each 
time the D key is depressed, Neither the C or D 
key effects the portion of the program before the 
displayed address. The table below shows what add- 
ress program CHECK-OUT considers to be the end of 
the program. Notice that this depends on the page 
currently being displayed when the C or D key is 
depressed. If desired, these ending locations can 
be changed by entering appropriate new address in- 
formation at the locations indicated in the last 


and then push the GO key. 


The display will. show 


two columns of the table. 


address 0000 and the <ontents of that memory lo- 
cation. Then push the B key to start automatically 
scanning through memory twoard the Back of the pro- 
gram, or the F key to start scanning toward the of its own instructions on page 1), the display 
Front of the program. The keys 1 through 9 control will go blank for as long as the illegal key is de- 
the scan speed. The zero key stops the scan at the pressed, and then all will return to the previous 
displayed address. The A key stops the scan one conditions when the illegal key is released. 
position beyond the currently displayed address, 
while the E key stops the scan one position prev- 
lous to the currently displayed address. If the changing branch instruction addresses when creat- 
scan speed is set to 9 (the fastest possible), the ing or deleting spaces. If this feature is de- 
A and E keys are equivalent to an immediate one sired, I invite you to write a routine to perform 
step forward or backward. Because the plus key was this address manipulation. Change the branch in- 
there, it was given its normal function, struction at location O1D1 in program CHECK-OUT to 
branch to your routine, and then return to address 
If, in scanning a program, an error is found, 0104 in program CHECK-OUT at the end of your 
stop the scan at the error ( by pushing the zero ~ouUta ne. 
key at the error, or stepping there with the A, E, . 
or plus keys). The push the DA key, and you will 


When attempting to do something program CHECK- 
OUT considers illegal (for example, modifying some 


Program CHECK-OUT does nothing in the way of 
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and scanning there at speed 9 would take too long, 1 not allowed 
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STORAGE AREA 


OOEF 00 PCL program counter, low 
OOFO 01 PCH program counter, high 
OOF] 00 PREG status register 
OOF2 FF SPUSER Stack pointer 
OOF3 00 ADL current address, low 
OOF4 00 ADH current address, high 
OOF5 05 SS scan speed (0-9) 
OOF6 00 RD read disable (disable if not zero) 
OOF7 00 MODE mode of operation (stop scan if zero) 
OOF8 FF LC loop counter for display loop 
OOFS 00 INH data position for display 
OOFA FA POINTL pointer address, low 
OOFB 00 POINTH pointer address, high 
aod oS sla temporary storage register #1 
EMP temporary storage register #2 
OOFE 00 Ree see yes this a 
OOFF 00 not used 


QUssumeEs 


CPU ig {sa ae 
fine cy IMO fe 


MAIN PROGRAM STARTS HERE 


0100 A9 OD ENTRY LDA #00 initial entry into program 





0102 85 FB STA POINTH set initial value of POINTL 

0104 AS FA START LDA POINTL get pointer address, low 
0106 85 F3 STA ADL store pointer address, low in ADL £oge, = tuo 
0108 A5 FB LDA POINTH get pointer address, high 

O10A 85 Fa STA ADH store pointer address, high in ADH 

O10C A2 FF LDX #FF initial value of SPUSER and LC 

O10E 9A TXS initialize stack pointer to #FF 

O10F 86 F8 STX LC initialize loop counter to #FF 

0111 A2 04 LDX #04 value for interrupt vector, low 

0113 8E FA 17 STX 17FA initialize interrupt vector, low 

0116 A2 01 LDX #01 value for interrupt vector, high page 9 
0118 8E FB 17 STX 17FB initialize interrupt vector, high 


SYM-1, 6502-BASED MICROCOMPUTER 


@ FULLY-ASSEMBLED AND COMPLETELY INTEGRATED SYSTEM that’s 
ready-to-use 

e ALL LSI IC’S ARE IN SOCKETS 

e 28 DOUBLE-FUNCTION KEYPAD INCLUDING UP TO 24 “SPECIAL” 
FUNCTIONS 

°e EASY-TO-VIEW 6-DIGIT HEX LED DISPLAY 

°e KIM-1* HARDWARE COMPATIBILITY 
The powerful 6502 8-Bit MICROPROCESSOR whose advanced 
architectural features have made it one of the largest selling “micras” 
on the market today. 

e THREE ON-BOARD PROGRAMMABLE INTERVAL TIMERS available to 
the user, expandable to five on-board. 

e 4K BYTE ROM RESIDENT MONITOR and Operating Programs. 

© Single 5 Volt pawer supply is all that is required. 

e 1K BYTES OF 2114 STATIC RAM anboard with sockets provided for 
immediate expansion to 4K bytes onboard, with total memory expan- 
sion to 65, 536 bytes. 

e USER PROM/ROM: The system is equipped with 3 PROM/ROM ex- 
pansion sockets far 2316/2332 ROMs or 2716 EPROMs 

e ENHANCED SOFTWARE with simplified user interface 

¢ STANDARD INTERFACES INCLUDE: 

—Avudio Cassette Recorder Interface with Remote Cantro! (Two 
modes: 135 Baud KIM-1* compatible, Hi-Speed 1500 Baud) 

—Fuyli duplex 20mA Teletype Interface 

—System Expansion Bus Interface 

—TV Cantroller Board Interface 

—CRT Compatible Interface (RS-232) 

° APPLICATION PORT: 15 Bi-directional TTL Lines far user applications 
with expansian capability for added lines 

e EXPANSION PORT FOR ADD-ON MODULES (51 I/O Lines included in 
the basic system) 

e SEPARATE POWER SUPPLY cannector for easy disconnect of the d-c 
power 

e AUDIBLE RESPONSE KEYPAD 





Synertek has enhanced KIM-1* software as well as the hardware. The 
software has simplified the user interface. The basic SYM-1 system ts 
programmed in machine language. Monitar status is easily accessible, 
and the monitor gives the keypad user the same full functianal capabili- 
ty of the TTY user. The SYM-1 has everything the KIM-1* has to affer, 
plus so much more that we cannot begin to tell you here. So, if you want 
to know more, the SYM-1 User Manual is available, separately. 


SYM-1 Complete w /manuals $269.00 
SYM-1 User Manual Only 7.00 
SYM-1 Expansion Kit 75.00 


Expansion. includes 3K of 2114 RAM chips and 1-6522 I/O chip. 


SYM-1 Manuals: The well organized documentatian package is com- 
plete and easy-to-understand. 
SYM-1 CAN GROW AS YOU GROW. Its the system to BUILD-ON. Ex- 
pansion features that are soon to be offered: 
*BAS-1 8K Basic ROM (Microsoft) $159.00 
*KTM-2 TV Interface Board 349.00 
*We do honor Synertek discount coupons 


QUALITY EXPANSION BOARDS DESIGNED SPECIFICALLY FOR KIM-1, SYM-1 & AIM 65 
These boards are set up far use with a regulated power supply such as the one below, but, provisions have been made so that you can add 
onboard regulators for use with an unregulated power supply. But, because af unreliability, we do not recommend the use of onboard 
regulators. All !.C.’s are socketed for ease af maintenance. All boards carry full 90-day warranty. 
All products that we manufacture are designed ta meet or exceed industrial standards. All components are first qualtiy and meet full 
manufacturer's specifications. All this and an extended burn-in is done to reduce the normal percentage of field failures by up to 75%. To yau, 
this means the chance of incanvenience and lost time due toa failure i is very rare; but, if it should happen, we guarantee a turn-around time of 


less than forty-eight hours for repair. 


Our money back guarantee: If, for any reason you wish to return any board that you have purchased directly from us within ten (10) days after 
receipt, complete, in original condition, and in ariginal shipping carton; we will give you a complete credit ar refund less a $10.00 restocking 


_ charge per boa rd. 


~VAK- 1 8-SLOT MOTHERBOARD 


This motherboard uses the KIM-4* bus structure. It provides eight (8) 
expansion board sockets with rigid card cage. Separate jacks for audio 
cassette, TTY and power supply are provided. Fully buffered bus. 

VAK-1 Motherboard $129.00 


~~ VAK-2/4 16K STATIC RAM BOARD 


This board using 2114 RAMs is configured in two (2) separately 
addressable 8K blocks with individual write-protect switches. 





VAK-2 16K RAM Board with only $239.00 
8K of RAM ( % populated) 

VAK-3 Complete set of chips to $175.00 
expand above board to 16K 

VAK-4 Fully populated 16K RAM $379.00 





“VAK-5 2708 EPROM PROGRAMMER 
is pode iaaabd, a +S Oe and +12 VDC, but has a cae to DC 


multiplyer so there is no need far an additional power supply. All 
software is resident in on-board ROM, and has a zero-insertion socket. 


VAR: 2 2708 EPROM Fregrammer $269.00 





"VAK-6 EPROM BOARD. 
This ae will hold 8K af 2708 or 2758, or 16K of 2716 or 2516 
EPROMs. EPROMs not included. 
VAK- 6 EPROM Board : $129. 00 


VAK- 7 COMPLETE FLOPPY- DISK SYSTEM (May 79) 








VAK- 8 PROTYPING BOARD 
This board allows you ta create your own interfaces to plug into the 
motherboard. Etched circuitry is provided for regulators, address and 
data bus drivers; with a large area for either wire-wrapped or soldered 


IC circuitry. 
VAK-8 Protyping Board $49.00 





ars arts ne 
ALL POWER SUPPLIES are totally enclosed with grounded enclosures for safety, AC power cord, and carry a full 2-year warranty. 


FULL SYSTEM POWER SUPPLY 
This power supply will handle a microcomputer and up to 65K of our 
VAK-4 RAM. ADDITIONAL FEATURES ARE: Over voltage Protection on 5 
volts, fused, AC on/off switch. Equivalent to units selling for $225.00 or 
more. 
Provides +5 VDC @ 10 Amps & +12 VDC @ 1 Amp 
VAK-EPS Power Supply $125.00 


I NC .O -R PO RA T-E D 





*KIM is a product of MOS Technology 


ENTERPRISES 


KIM-1* Custom P.S. provides 5 VDC @ 1.2 Amps 
and +12 VDC @ .1 Amps 





Rade Power Supply $41.50 
SYM-1 Custom PS. provides 5 VDC @1.4Amps SS 
vcP- 1 Power Supply $41.50 


2967 W. Fairmount Avenue 
Phoenix AZ 85017 


(602)265-7564 

















011B 
011D 
0120 
0123 
0125 
0127 
0129 
012B 
012D 
O12F 
0132 
0134 
0136 
0137 
0138 
O13A 
013C 
O13E 
0140 


0142 
0143 
0145 
0147 
0149 
0148 
014D 
0150 
0152 
0154 
0156 
0158 
0159 
015B 
015D 
O15F 
0161 
0162 
0164 
0166 
0168 
O16A 
016C 
O16F 
0171 
0173 
0175 
0177 
0179 
017B 
017D 
OI7E 
0181 


0184 
0186 
0188 
018A 
018C 
O18E 
0190 
0192 
0194 
0196 
0198 
019A 
019C 
O19E 
O1A0 
O1A2 
01A3 
01A4 
O1A6 
O1A9 
01AB 
O1AD 


O1AF 
01B1 
01B2 
01B4 
O7B5 
01B6 
01B8 
O1BA 
01BC 
O1BE 
O1BF 
01C1 
01C3 
OIC5 
O1C7 
01C9 


A9 80 
80 47 
20 19 
DO 04 
85 F6 
FO 43 
A5 F6 
DO 3F 
E6 F6 
20 6A 
C9 00 
FQ 32 


E9 OA 
10 06 
49 FF 
85 F5 
10 2A 


C9 12 
FO 36 
10 23 
C9 10 
DO 03 
4c 7C 
29 OA 
C9 OA 
FO 14 
A4 FB 


FO D4 
AS F7 
FO 02 
10 CE 


c9 11 
FO E7 


A2 00 
86 F7 
AD 47 
FO AF 
E6 F8 
Ad F8 
C5 F5 
90 A2 
A6 F7 
FQ 04 


20 D6 
4c 04 


86 FC 
AO EE 
A5 F4 
FO OE 
C9 17 
FO 08 
BO 9D 
A9 03 
AO FF 
30 02 
AO E6 
84 FA 
85 FB 
AQ 00 
Bl FA 
AA 

98 

91 FA 
20 EE 
Ad FC 
C9 OD 
FO OB 


Bl FA 
C8 

91 FA 
88 

98 

91 FA 
FO 09 
Bl FA 
85 FD 
8A 

91 FA 
A6 FD 
A5 F4 
C5 FB 
90 DD 
DO 06 


17 
TF 


01 
01 


01 


LOOP] LDA 
STA 
AGAIN JSR 
BNE 
STA 
BEQ 
ONE LDA 
BNE 
INC 
ERROR JSR 
CMP 
BEQ 
TAX 
SEC 
SBC 
BPL 
EOR 
STA 
BPL 


TWO TXA 
CMP 
BEQ 
BPL 
CMP 
BNE 
KIM JMP 
THREE AND 
CMP 
BEQ 
LDY 
DEY 
BEQ 
LDA 
BEQ 
BPL 
FOUR TXA 
CMP 
BEQ 
BNE 
MZERO  LDX 
MODE STX 
DONE LDA 
BEQ 
INC 
LDA 
CMP 
BCC 
LDX 
BEQ 
TXA 
JSR 
FIVE JMP 


DISPLAY/KEYBOARD-DECODE LOOP 


#80 
1747 
SCAND 
ONE 
RD 
DONE 


#12 
PLUS 
DONE 
#10 
THREE 
1¢7C 
#0A 
#0A 
MODE 
POINTH 


ERROR 
MODE 
FOUR 
ERROR 


#11 
KIM 
MOVE 
#00 
MODE 
1747 
AGAIN 
LC 
LC 
SS 
LOOP 
MODE 
FIVE 


NEXT 
START 


value to store in the timer 

start timer 

activate display 

branch if any key is depressed 
enable the reading of the keyboard 
unconditional branch to end of loop 
get value of read disable 

branch to end of loop if RD not zero 
set read disable to #07 

read keyboard 

is the zero key depressed? 

branch if the zero key is depressed 
store keycode in X register 

required by next instruction 
Subtract #0A from keycode 

branch if keycode is not speed control 
compute new value of speed 

store new value of speed in SS 
unconditional branch to end of loop 


return keycode to accumulator 

is the plus key depressed? 

branch if plus key depressed 
ignore unused keys 

is the AD key depressed? 

branch if AD key not depressed 
enter the KIM monitor 

result not #0A for C, D, & DA keys 
result is #0A for A, B, E, & F keys 
branch if key is A, B, E, or F 
load page number into Y register 
decrement page number in Y register 
blank display if page number = 1 
load mode into Y register 

branch if mode is zero 

blank display if mode not zero 
return keycode to accumulator 

is the DA key depressed? 

enter the KIM monitor if DA key 
branch if C or D key depressed 

the new value of mode 

store the new value of mode 


test the clock 


display again if not time 

add one to loop counter 

get new value of loop counter 
compare to total number desired 
do another loop if necessary 
get value of mode 

return to START if mode is zero 
put mode in accumulator 

set up next POINTL and POINTH 
end of display/keyboard loop 


ROUTINE TO SERVICE THE C AND D KEYS 


MOVE STX 
LDY 
LDA 
BEQ 
CMP 
BEC 


BCS. 


LDA 
LDY 


BMT. 


SIX LDY 
SEVEN STY 
STA 
LDY 
LDA 
TAX 
TYA 
STA 
LOOP2 JSR 
LDA 
CMP 
BEQ 
CKEY LDA 
INY 
STA 
DEY 
TYA 
STA 
BEQ 
DKEY LDA 
STA 
TXA 
STA 
LDX 
TEST LDA 
CMP 
BCC 
BNE 


TEMP 1 
#EE 
ADH 
SEVEN 
e\7 
SIX 
ERROR 
#03 
#FF 
SEVEN 
#E6 
POINTL 
POINTH 
#00 
POINTL,Y 


POINTL,Y 
SUB 
TEMP] 
#0D 

DKEY 
POINTL,Y 


POINTL,Y 


POINTL,Y 
PES: 
POINTL,Y 
TEMP2 


POINTL,Y 
TEMP2° 
ADH 
POINTH 
LOOP2 
END 


store keycode in TEMP] 
location of useful end of page zero 

put page number jin accumulator 

branch if page zero 

is page number equal to 17? 

branch if page number is 17 

blank display if page number > 17 

end page in unexpanded KIM system RAM 
location of end of page 

unconditional jump 

location of useful end of page 17 

store end of page location in POINTL 
Store end page number jin POINTH 

value needed for (indirect) ,Y addressing 
LDA with byte at the end of the last page 
Store byte in the X register 

bring #00 to accumulator 

put zero in end of page location 
decrement POINTL/POINTH 

get keycode from TEMP] 

which key (C or D) is depressed? 

branch if D key is depressed 

get byte at pointed location 

increment Y register to unity 

store byte in next larger address 
decrement Y register to zero 

set accumulator to zero 

Store zero in pointed location 

branch around D key instructions 

get byte at pointed location 

store temporarily in TEMP2 

bring following byte to accumulator 
Store byte in pointed location 

retrieve stored byte 

ADH is endpoint of POINTH 

has final page been reached? 

if not, loop back page 11 
al] done if ADH > POINTH 


O1CB A5 F3 LDA ADL 
O1CD C5 FA CMP POINTL 
O1CF 90 D5 BCC LOOP2 
01D] 4C 04 01 END JMP START 
0104 EA NOP 

O1D5 EA NOP 


ADL is endpoint of POINTL 

has final location been reached? 
if not, loop back 

end of C and D key routine 

not used 

not used 


SUBROUTINE TO STEP POINTL AND POINTH 


01D6 AO 00 NEXT LDY #00 


O1D8 29 01 AND #01 
O1DA DO 02 BNE EIGHT 
O10C 84 F7 STY MODE 
O1DE 88 EIGHT DEY 

O1DF 8A TXA 

O1E0 29 04 AND #04 
O1E2 DO OA BNE SUB 
O1E4 98 ADD TYA 

O1E5 C5 FA CMP POINTL 
O1E7 DS 02 BNE NINE 
O1E9 £6 FB INC POINTH 
O1EB E6 FA NINE INC POINTL 
O1ED 60 RTS 

O1EE C6 FA SUB DEC POINTL 
O1FO AQ FF LDA #FF 
O1F2 C5 FA CMP POINTL 
O1F4 DO 02 BNE RETURN 
O1F6 C6 FB DEC POINTH 
O1F8 60 RETURN RTS 


possible new value of mode 

is least significant digit zero? 
F and B keys require nonzero mode 
A and E keys require zero mode 
decrement Y register to #FF 
bring mode to accumulator 

in which direction is the scan? 
branch if E or F key depressed 
bring #FF to accumulator 

is POINTL equal to #FF? 

branch if not equal to #FF 
increment POINTH to new value 
increment POINTL to new value 
return 

decrement POINTL to new value 
needed for next instruction 

is POINTL equal to #FF? 

branch if not equal to #FF 
decrement POINTH to new value 
return 


RESERVED FOR STACK 


O1F9 to OFF 


LANGUAGE LAB 
basic 


BASIC MOD & PROGRAMMING HINT 


by Heinz Joachim Schilling, DJ1XK 
Im Grun 15 
D-7750 Konstanz 16 
W Germany 


Two days ago my copy of 6502 User Notes ar- 
rived, and because of new format and content I 
must say: Congratulations !!! You have arranged it 
into several sections, so it is quite easy to find 
an object of special personal interest. In my case 
it is BASIC. 


You rised a BASIC question, and I have the 
solution. The problem of re-loading programs comes 
from a programming error of the Microsoft people. 
They did not realize that 

Lis the ID = $00 or $FF are only operable 
if the tape was not saved with an ID 
of $00 or S$FF, 
2. loading to a changed address using 
SFF in $17F9 is not possible with 
their tapes as they use $FF in $17F9 
during save! 
You have to change the LDA $FF into LDA $FE at 
$274 , the SFE is at $2744, and that's all! You 
should have a look into the listing of the KIM- 
loader to see that ID=$FF only comes into operation 
after the compare between the $17F9-ID and the 
tape-ID, in our case the compare matches and the 
tape is loaded to the same location as it is saved. 


You are right that the BREAK~Test should in- 
clude the 30 as an opcode. 


The KIM BASIC hint regarding inputting only a 
‘return’ is good, and I have another one! 


In every case you try to use the cursor con- 
trol codes in PRINT-statements with a semi-colon 
at the end you run into trouble: after 72 chars 
(or any other number you inputted at the cold 
start) the BASIC thinks the line would be complete 
you inserts a CR-LF, and off you are. This is 
true in all sorts of games (3 cushion billiard, 
life and so on). But the solution is so easy: add 
a simple POKE, and everything will run: 

1000 PRINT CHRS$(9);:POKE 22,1:REM CURSOR RIGHT 
The POKE goes to the memory cell which holds the 


position in the line. The storage of the 1 let page 12 


the BASIC think it was at the beginning of the 
line and so0 the inclusion of the unwanted CR-LF is 
dropped. 


Besides, I have made a little program with 
subroutines of HYPERTAPE and LOAD in the same form 
as they are used in the Micro Ade Assembler, that 
means with optical control of the loading. You 
can see on the 7-segment-display three different 
states: SYNC, Loading and seeking (that means if 
your load was with a fault and the loader looks 
for another ID), This little program has routines 
for calling these subroutines, and it can start 
BASIC and can start other programs at a specific 
address, I use the loader- and save~subs from 
BASIC too, and so my BASIC is in the memory in 3 
minutes instead of 18! Besides, I have made a dig- 
assembler printout of BASIC to allow easier cor- 
rections to BASIC. I think it would be possible 
to PROM the BASIC with trig functions, but this 
would be only possible in 9K, and you would have 
to change something in the coldstart routine. You 
must only make a little correction to the “Want 
SIN..." routine and take the first address after 
the PROM as beginning of free memory to $78, $79, 
e.g. the Want Sin prompting will be deleted. 


The renumbering program on page 12 seems to 
be good, but I want to make one in assembler which 
could be loaded to my spare memory at $0400 and 
must not be deleted at the end of the operation. 


I just remember another little correction to 
my BASIC: I changed the location $243A to $E5 
which allows the use of the DEL key at my terminal 
instead of the underline to delete a wrong char- 
acter. 


The most important thing during work with 
BASIC for nay corrections: a disassembler print- 
out!!!!} 


Then it is very easy to follow the flow 
through the interpreter and make little changes, 


BASIC OUTPUT PAGING MOD 


MONS Snare AEA het SENDA MA AO EN ASSP RANT Ra! SE ED IN 


by Dick Grabowsky 
HDE, Inc. 
Box 120 
Allamuchy NJ 07820 


Marvin Dejong asks where to look to make Ba- 
sic list 16 lines, rather than scoot the program 
past his eyes so quickly he can't see it. 


Microsoft Basic does not use the KIM CRLF 
routine. Rather, it outputs a CR (0D) and line 
feed (0A) followed by a number of nulls as defined 








in LOC $15. These characters are all transfered 
to the KIM OUTCH routine. In 9-digit Microsoft 





Basic, the call to KIM QUTCH is located at $2A51. RENUMBER ADDENDUM AND SOME MODS 

To limit output, we can intercept this call, count 

the number of times the CR or LF character pass by Harvey Herman 

through our intercept, then halt further output Dept. of Chemistry 
until the operator inputs some character from the Univ. of North Carolina 
keyboard. Greensboro, NC 27412 


I recently sent you a BASIC renumbering pro- 
gram for KIM Microsoft 8K BASIC. In the accompan- 
ying letter I noted one restriction about tlhe num- 
ber of digits in the new line number, Sean McKen- 
na has written me about one further restriction. 
He notes that numbers after THEN in an assignment, 
for example, will always be renumbered. Thus, the 
2 in 10 IF A = 1 THEN X=2 could be inadvertently 
changed, He suggests using variables in assign- 
ments after THEN (X = V, where V = 2) to avoid the 
problem. 





The following routine does this by counting 
the line-feed characters and stopping output until 
a line-feed is entered via the keyboard, As a bo- 
nus, let's add an ability to stop output (i.e. 
terminate the process) when we've found what we 
want, or have seen enough. The routine maybe 
placed anywhere in memory that will not be over- 
written by Basic or Basic programs/data, 


LINCNT CMP #S0A sis it a line feed? 


BNE LINC1 ;no, then output . j 
INC COUNTR ;yes, incr the counter I also mentioned another renumbering program 
LDA COUNTR, <and ‘cheek. to. .8e6 LE I use which utilizes a paper tape punch. This pro- 
CMP LNCNT sit ='s preset line count gram does eed eae Ene above oe wa EPecere 
BEQ LINC2 vee... shalt output are interested in this program 1 will send it to 
LDA #S0A i dilge.:reloed Lane. feed them on receipt of a SASE and extra loose stamp. 
Penne SHEN TEAS SACIM. OUECH) I wrote you recently about the question you 
posed to your readers about Microsoft BASIC. It 
is possible to automate the “Y" answer in an ini- 
tialization rautine and I documented the procedure. 
A further point-4146 can be changed to 4E or 41 if 


LINC2 LDA #0 
STA COUNTR j;reset the counter 
LINC3 JSR S$l1E5A ;(KIM GETCH) get a char 


CMP #SOA ;line feed? : ae a, 
BEQ LINC1 ;yes, continue listing 'N" or "A" is the desired response. 
CMP #S0D sreturn? . : ; 
BNE LINC3 sno, ignore In reply to a question posed to me in a pri- 
IMP $0 ‘else. jump: to “warm start" vate letter I have figured out how to skip all 3 
: initialization questions and their accompaning mes- 
sages, 
COUNTR ¥*=*=] ;line feed counter , ‘ 
LNCNT keke] Shares. aie 1. To size memory automatically change- 
, Locations From To 
To use the routine, set the address of "LINCNT” es - JMP $40CD 
at $2A52, $2A53. Preset the values of "COUNTR" to LOBB oA 40 


zero and "LNCNT" to the desired number of lines 
(use HEX). All output will then be Limited to the 


number of lines defined by LNCNT. Since Basic Be “EO: Beep ao ee Reunited vier 


does not use zero page locations from $DD up, SDD so aA - ie es 
: 2 410B 18 36 
and $DE may be good locations to put "COUNTR" and 410C 2A ral 


“LNCNT" since this can be done before loading Ba- 
sic from tape. 





3. To answer "Y" to trig functions question and 


j : , : skip message 
When in Basic, the routine can be used to li- P - 








: : 413A 20 4&C JMP $4145 
mit output to a specific number of lines by "poke" 413B 18 45 
ing the values of “COUNTR" and “LNCNT" as appropri- 413C 2A Al 
ate. es wet team ceo sasi nt Nabi d SEAS sal Nios dbs orn aioe ions boone ub asa iter aan A ai popcorn omens SANA sine edics bic ieashdbaset RE, 
One additional note, 9 digit Basic sets the 
base address for programs at locations $4148 and 4145 co A9 LDA #'Y or 'N or 'A 
S414A to 41 and 40, respectively. To gain room 4146 00 59 or 4E or 4l 
above Basic for additional software, changing 
these locatians to the address values desired will 
do the trick. By the way, to check on the authors 
of Microsoft Basic, enter an "A" in response to 
the “memory size?" question. 
AUTOMATIC LINE NUMBER ENTRY PROMPT FOR BASIC 
0019: : 
0910: Sean McKenna 
9920: 64 Fairview Ave. 
9030: Piedmont, CA 94619 
0040: January, 1979 
0050: 
0060: 
OIE1: MUMSER REVISED VERSION 
3962: 
9979: An automatic line numbering input routine 
0000: for 9 digit KI‘! SASIC. From conmand BASIC 
9990: enter # nnnntii(sp)CR to begin automatic 
JLIO: line nurmoer sequencing witn nnonn. Laca 
Qi10: line will be increiwented by ii. ‘to return 
0120: to command BASIC enter CR after line number. 
0130: On delete the line number will be repeated 
J140: on the next line of the terminal. Don't 
9159: forset tne space after the increment numover 
0160: or you may vet no increrent at all or a 
9170: strancde one. Because of the decimal add 
0189: the hisiest line number possible with the 
3130: proqgrar is 9999 and 99 is the hishest 
0299: increnent 
0219: 
O21 1% Initialization: SFOFLG and TIMNUM must be 
9212: initialized to $90 before usin¢e the routine 
OZ132 


0220: pee ne 
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0230: 


0240: 
0250: 
0260: 
0270: 
0280: 
0290: 
0300: 
0310: 
0320: 
0330: 


°0340: 


0350: 
0360: 
0370: 
0380: 
0390: 
0400: 
0410: 
0420: 
0430: 
0440: 
0450: 


' 0460: 


0470: 
0480: 
0490: 
0500: 


0510: 
0520: 
0530: 
0540: 
0550: 
0560: 
0570: 
0580: 
0590: 
0600: 
0610; 
0620: 
0630: 
0640: 
0650: 
0660: 
0670: 
0680: 
0690: 
0700: 
0710: 
0711: 
0712: 
0713: 
0714: 
07203 
0739: 
0740: 
0750: 
0760: 
0770: 
0780: 
0790: 
0800: 
0810: 


- 0820; 


0830: 
0840: 
0850: 
0860: 


0870: 


0880: 
0390: 
0900: 
0919: 
0920: 
0930: 
0940: 
0950: 
0960: 
0970: 
0980: 
0990: 
1000: 
1010: 
1020: 
1030: 
1040: 
1050: 
1060: 
1070: 
1089: 
1090: 
1100: 
1110: 
L120 


0200 
0200 
0200 
0200 
0200 
0200 
0200 
0200 
0200 


0200 
0200 


0200 
0202 
0204 
0206 
0209 
020B 
020E 
0210 
0212 
0214 
0217 
0218 


02183 
021D 
021F 
0221 
0223 
0225 
0227 
0229 
022A 
022C 
022E 
0230 
0232 
0234 
0236 
0238 
023A 
023C 


023E. 


0241 
0243 
0246 
0248 
024B 
024D 
024F 
0252 
0254 
0256 
0258 
025A 
025D 
025F 
Q261 
0263 
0265 
0267 
0269 


026A 
0268 
026C 


026D. 


026E 
026F 
0272 
0275 
0276 
0279 
027C 
027D 
027F 
0281 
0282 
0284 


0286 
0288 
0289 
028C 
O28E 
028F 


0290 ° 


0291 
0293 
0295 


7D 
89 


7D 
89 


OF 
OA 


02 


30 


17 
1B 


18 


20 
F9 


0.2 


02 


10 


10 


10 


10 


17 


02 


02 


02 


02 
02 


10 


NUMBER 
INCR 

SEQFLG 
TIMNUM 


ORG 


*eete © He H 


* 


$0200 
‘SQ00E5 
SOO0E6 
SOOE7 
SO0E8 
$O0E9 
$001B 
$1A00 
S17E9 


Set input and output to your routines. 
Input should echo to output and preserve X. 
Output should preserve X and ACC. 


INPUT 
OUTPUT 


* 
* 


Enter here 


START 


LINO 


INP 


CRQ 


SETLWO 


ENDSEQ 


CLRSEYQ 


CRRET 
RETURN 


BIT 
BPL 
LDA 
JSR 
LDA 
JSR 
LDAIM 
STAZ 
LDAIM 
JSR 
RTS 


JSR 


CMPIM 
BNE 
BIT 
BPL 
LDAIM 
STAZ 
LDAIM 
RTS 
CMPIM 
BNE 
BIT 
BMI 
LDA 
CMPIM 
BNE 
LDAI'A 
STAZ 
HDAIM 
JSR 
LDAIM 
JSR 
LDXIM 
STX 
STX 
STX 
JSR 
LDXIM 
BEQ 
CPXIM 
BMI 
JSn 
LDAIN 
STAZ 
BMI 
LDAIM 
STAZ 
LDAIM 
RTS 


SUBROUTINES 


OUTNUM 


HXTAS 


PHA 
LSRA 
LSRA 
LSRA 
LSRA 
JSR 
Jon 
PLA 
JS2 
JSR 
RTS 
AWDI?4 
CMP IM 
CLC 
BMI 


_ADCIM 


HXI 


PINUM 


SETNUM 


ADCIM 
RTS 
Jsn 
STAAX 
INX 
RTS 
INX 
LDAAX 
CMPIM 
BEQ 


$1000 
$1017 


From KIM BASIC INPUT call 


TIMNUM 
INP 

HI 
OUTNUM 
LO 
OUTNUM 
$00 
TIMNUM 
$20 
OUTPUT 


INPUT 
$40 
CRQ 
SEQFLG 
RETURN 
SFF 
TIMNUM 
$40 


$0D 
RETURN 
SEQFLG 
ENDSEQ 
BASBUF 
$23 
CRRET 
SFF 
SEQFLG 
30D 
OUTPUT 
SOA 
OUTPUT 
$00 
SAVX 
HI 

LO 
SETNUM 
$00 
LINO 
$98 
CLRSEQ 
INCLN 
3FF 
TIMNUM 
CRRET 
$00 
SEQFLG 
SOD 


FOLLOW 


HXTAS 
PNUM 


HXTAS 
PrIUM 


SOF 
990A 


HxI 
$07 
930 


QUTPUT 
BASRUF 


BASBUF 
$20 
SETNUM 


If not time to output a line number 

Then branch to input call 

Otherwise output a 4 digit line number to 
the BASIC input buffer and -users display 


and clear the TIMNUM flag 


Output a space 


and returm to basic 


Get user input 


If delete input 
and segence flag is set 


then set TIMNUM flag 
restore delete 

If CR 
and sequence flag is set 
go gee what to do 
otherwise look at BASBUF 
did he input a #? 

If not return with a CR 


If yes set sequence flag 
Output a CR 


and LF 


Clear HI, LO and SAVX 


and go set up HI,LO and INCR 

send the first line number and return 
clear SEQFLG if not enough in buffer 
otherwise add increment to line number 
and set the TIMNUM flag 


and returns with CR in ACC 


Puts hex byte in ACC in BASIC buffer as 
2 ACII decimal digits and ehoes to user 


Changes hex character to ASCII 


Line number to buffer and output 


Gets base line number and increment from 
buffer and places in HI,LO, and INCR 


Ignore spaces 














1130: 0297 C9 2B CMPIM 32B If plus sign (+) then go get increment 

1140: 0299 FO 18 BEQ GETINC 

1150: 029B 20 00 IA JSR PACKT Otherwise convert to ASCII and store 

1160: O29E AS ES LDA LO 

1170: O2A0 AO 04 LDYIM $04 Into HI and LO 

1180: 02A2 OA ROT ASLA 

1190: 02A3 26 E8 ROL HI 

1200: O2A5 88 DEY 

1210: O2A6 DO FA BNE ROT 

1220: O2A8 OD EY 17 ORA SAVX 

1230: O2AB 85 E9 STA LO 

1240: O2AD 8C ES 17 STY SAVX 

1250: 02B0 4C 90 02 JMP SETNUM And go look for next one 

1260: 0283 E8 GETINC INX 

1270: 0284 35 13 LDAAX BASBUF Get increment number 

12380: 02B6 C9 20 CMPI™ $20 

1290: 0288 FO 05 ~ BED GOTIT If blank done 

1390: O2BA 20 00 1A JER PACKT Convert to ASCII and leave it in SAVX 

1310: Q28D FO F4 BEG GLTINC Go get next one 

13293: 023F AD £9 17 GOTIT LbA SAVX 

£3303. 0262.05.55 STAZ NCR put it in INCR and return 

1340: 02C4 690 RTS 

1350: 02C5 A5 E5 INCLN LDAZ INCR Add increment amount to line number 

1369: 02C7 18 CLC 

1370: 02C3 F8 SED 

1330: 02C9 65 E9 ADC LO would sell the source code for an additional 15 
1390: 02CB 85 E9 STA LO bucks). 

1400: O2CD A5 E8 LDA HI ‘ ; ee fee eae de 
1410: 02CF 69 00 ADCIM $00 The. real-time clock ls actually a tick 
1420: 02D1 85 E8 STA I counter and not a time of day clock. Could be 
1430: 02D3 DB CLD useful in games etc, 

1449: 02D4 60 RTS PRODUCT ANNOUNCEMENT 


A NEW COMMAND FOR BASIC 





Dick Grabowski 
HDE INC, 


To implement the "GET" command in KIM BASIC 
by Microsoft, chamge the following: 


at location S$2AEA-S2AEC enter AO OO A2 1A 


The "GET" command allows terminal input and 
test of a single character without the need to 
enter the “RETURN" key. One example is in termin- 
al use where you want to hold some material on the 
screen until the user signals completion: 


1000 PRINT:PRINT “ENTER SPACE WHEN READY";:GET AS: 
IF AS€>'" THEN 1000 


This will repeat the prompt "ENTER SPACE WHEN 
READY" until a space is entered, then fall through 
‘to the next program step. Of course, many other 
uses ex1st., 


GET A ---returns the numeric value 0-9 

GET A$—--returns the alpha value A-Z 
Eniroes Appirion — 

Bob Kurtz of Micro-Z mentioned that he got 
the "GET" command working by chamging location 
$2AEE from $D0O to $FO. 


The GET command will simplify the user inter- 
face considerably. 


PRODUCT REVIEW 


by the editor 


Review of Harvey Hermans Basic Enhancement Package 
as mentioned in Issue #13 p. 12. 


Besides what I mentioned in issue #13 you 
also get a method for using KIMs ST key for stop- 
ping the program in a controlled manner, the ab- 
ility to append Basic programs and subroutines 
from cassette tape, and a fix for a bug in Basics 
cassette save routine (also see Herr Schillings 
letter in the Basic section of this issue for the 
same fix). 


For 15 bucks you get five pages of info, 
Four pages of explanations and sample printouts 
of the Basic mods and the fifth page is a hexdump 
of the mods. 


There's no doubt that this is a useful pack-. 
age of info for the Basic user. My only complaints 
are that the price is a little steep ($7.50 would 
have been more like it) and the source codes for 
the mods is not included (Mr. Herman indicated he 





Bob Kurtz of Micro~-Z has announced that he is 
making available his Basic mods which add Hyper- 
tape and most importantly the ability to save and 
load Basic data as well as programs. (This is 
one of the shortcomings of the 6502 version of Mi- 
crosoft Basic. It's hard to believe that this a-~ 
bility wouldn't be part of the original ,program 
specs.) The ability to save data ig a very im- 
portant one as it enables one to maintain and up- 
date data files of such things as income info for 
tax time, scores. for the plant bowling league, 
handicaps for the local golf course, maintaining 
your check book, etc etc. 


The package also includes a 60 + page Basic 
manual which explains each command in detail and 
includes many programmed examples. I have the 
manual and can attest to its completeness. The 
only thing this manual doesn't include is any 

Zero-page usage data 
as was found in the Basic documentation included 
with the Basic from Johnson Computer. 


Anyhow, Micro-Z is asking $35 for their Ba- 
sic enhancement package and this uncludes the man- 
ual. Contact Micro-Z Co, Bax 2426, Rolling Hills, 
Ca 90274, 
USRo 


BASIC | FUNCTION INFO 





C. Kingston 
6 Surrey Close 
White Plains NY 10607 


Microsoft BASIC users should note that "“AYINT" 
does not work as described in the instructions for 
Microsoft BASIC (at least in my version of it.) 
The USR argument is returned to S$OOB1(HI) and 
$OOB2(LO), and not to Y and A. After having some 
problems with the USR statement, I wrote to Micro- 
soft and they repsonded with the above information 
(apparently not having had this brought to their 
attention before according to their letter). You 
should check your version out to see what it does, 
as newer ones may have this changed either in the 
program or the instructions. This is applicable 
for the KB-9 version. I cannot verify that the 
following work, but Microsoft wrote that the re- 
turn is to AB(LO) and AC(HI) in KB-6, and B4&(LO) 
and B5(H1) in the ROM version. I would check the 
HI-LO arrangement carefully, since they had them 
reversed for the KB-9 version; they work as stated 
above in my BASIC, 


FROM THE EDITOR: The 'USR' function in Micro- 
soft Basic ts a kbuge at best. Does anyone know 
where the 'USR' routine 44 Located in Basic 40 we 
Can make it work right. Tiny Basic has a much 


better machine Language interface. 
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@ 
ave a few 
suggestions... 


not, | nee h 






Two books, whose programs 

are now available on computer program 
tapes, will give you numerous suggestions 
and complete directions for some unique 
and fun applications for your KIM. 















THE FIRST BOOK OF KIM (by Jim Butterfield, 
Stan Ockers, and Eric Rehnke) is the book all KIM users 
have been waiting for. In it, you’ll find a beginner's guide 
to the MOS Technology KIM-1 microcomputer as well as 
an assortment of games and puzzles including Card 3 
Dealer, Chess Clock, Horse Race, Lunar Lander, and 
Music Box. The authors go into detail.on how you can 
expand your KIM from the basic small-but-powerful 
KIM-1 system to a huge-and-super-powerful machine. 
Also featured are diagnostic and utility programs for test- 
ing both the computer and external equipment (such as 
cassette recorders), expanding memory, and controlling 
analog devices. (#5119-0, $9.95) Now available are 
easy-to-use computer program tapes that feature the 28 
recreational and 13 utility programs found in THE FIRST 
BOOK OF KIM. Tape 1 (#00700) and Tape 2 (#00800) 
have 14 recreational programs each, and Tape 3 (#00900) 
has 13 diagnostic and utility programs. All three tapes are 
$9.95 each. 


HOW TO BUILD A COMPUTER-CON- 
TROLLED ROBOT (by Tod Loofbourrow.} ‘Finally 
someone has written a book on robot building with micro- 
processor/microcomputers and a good one at that!...a 
gold mine of useful information on interfacing microcom- 
puters to the real world — and beyond." Computer Deal- 
er. You'll experience the thrill of creating an intelligence 
other than human when you see how ‘Mike’ grows from 
totally under your control, to seeing and feeling his en- 
vironment, to responding to voice commands. This book 
details that creation by giving step-by-step directions for 
building a robot that is controlled by a KIM-1. (#5681-8, 
$7.95). The five complete control programs for a robot are 
clearly documented in the book and are available on a 
Computer program tape. (#00100, $14.95) 
























































| Books and Tapes are available at your local computer store! 


}Hayden Book Company, Inc. 50 Essex Street, Rochelle Park, NJ 07662 
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focal 


Lots of neat mods are in store for FOCAL. 
We're going to add a cassette save & load facility, 
a Basic-like data gtatement, output to KIM's seven 
segment display, the ability to handle arrays of 
strings, an improved print command, a machine lan- 
guage subroutine call and a few minor fixits and 
speed-up mods. 


Before we do all this, however, we need some 
room, The present size of the Aresco V3D is about 
6K so let's stretch it out to an even 8K and give 
ourselves a little breathing room. If you examine 
the listings (love them listings!), you'll notice 
that the user program must start right after Focal 
because of line number 00.00 at $35EB, 


(One problem: all these mods pertain to V3D 
which is distributed by Aresco and not necessarily 
to FCL-65E which is distributed by 6502 Program 
Exchange, The symbolic addressing info might per- 
tain to FCL-65E but since I don't have a listing 
of FCL-65E, I can't be sure. FCL-65E might be an 
updated version of V3D but I can't be sure). 


Extend V3D FOCAL to 8K by moving $35EB through 
$360A to $3FEO-S3FFF. This moves the line 0.0 
startup message to the top of the 8K block that 
will be used by FOCAL. Some zero page pointers 
must also be changed to allow for the above mod. 


change: TEXTBEG $002F FROM SEB TO SEO 
$0030 FROM $35 TO $3F 
PBADR $0031 FROM $09 TO SFE 
$0032 FROM $36 TO $3F 
VARBEG $003E FROM $OA TO S$FF 
$003F FROM $36 TO $3F 
VARST $0040 FROM $OA TO SFF 
$0041 FROM $36 TO $3F 
VAREND $0042 FROM SOA TO SFF 
$0043 FROM $36 TO $3F 

PDLIST $0053 NO CHANGE 
$0054 FROM $3F TO $5F 


This is the FOCAL pushdown stack and should 
be set to some convenient page up out of the way 
of FOCAL programs. $5F assumes a 16K system. 


Another thing that must be improved is the 
way FOCAL sets up zero-page. Actually, it doesn't, 
I really can't understand why the implementers 
overlooked this problem. Oh well...it's easy to 
fix. At $3F00 add the following zero page intial- 
ization routine. $3F00 will become the new cold 
start address. 


ZPAGE 
ZSTORE 
LENGTH 
STARTF 
*=$3F00 
CSTART  LDX #0 ; LINITS THE LOOP COUNTER 
ZLOOP LDA ZSTORE,X ; START MOVING DATA 
STA ZPAGE,X 
INX 
CPX #LENGTH+1 
BNE ZLOOP 
JMP STARTF : PAGE IS SET UP 
- GO TO FOCAL 


$0 

$3¥F10 

SBF ; NUMBER OF BYTES 
$2000 


Ok now, we have stretched out FOCAL to 8K and 
added a Z page initialization routine, What next? 
We'll start adding mods from $35EB-$3EFF. 


More next time.....-. 


tiny basic 


Oops! In issue #13, I left out the mod that 
must be made to the IL at $0A26., Here it is: 


0A26 l1E NX NX on REM instead of NS. 


In the next issue, we'll be presenting a very 
comprehensive string capability for TB as well as 
a cassette save and load ability. (I ran out of 
room in this issue). Must be a good number of Ti- 
ny Basic users out there. Have you done anything 
neat with TB? Let us know. 


forth 


Nothing new to report here except that by is- 
sue #15 or #16 I hope to be announcing availability 
of FORTH for KIM. Preliminary versions are actu- 
ally operational at this point, but documentation 
has to be written and other details have to be 
worked out. This version of FORTH was written to 
conform to the implementation info presented in 
the Caltech FORTH manual. A complete source list- 
ing will be available, 


Beware - gust because it's called FORTH don't 
mean 4t neakky ia, Before you purchase any pack- 
age cakked "FORTH" make sure 4% conforma to the 
"EnternationalL standard" preaented in #73. 


xplo 


Ready for something new? Take a look at XPLO. 
This is a black structured compiling language that 
is quite a bit different from BASIC or FOCAL and 
more along the lines of a subset of ALGOL or PAS- 
CAL. An article on XPLO appeared in Kilobaud (Feb 
79 p. 24) which should enlighten you on the ins 
and outs of this new addition to the 6502 users 
arsenal, 


I purchased XPLO from the 6502 Program Ex- 
change, 2920 Moana, Reno NV 89509. Get their cat- 
alog for $1. Lots of good software from this group 
Check them out. 


Here's a sample HILO program written in XPLO 
to give you an idea what it looks like. 


‘CODE’ CRLF=9*sRANDOM=1+ INFUT=10% TEXT=125 
‘INTEGER’ GUESS»NUMBER? INCORRECT, TRYS 


“PROCEDURE ’ MAKEANUMBER » 
‘BEGIN’ 
NUMBER } =RANDOM( 100) > 

‘END’; 
‘PROCEDURE ’ INPUTGUESSs 
‘BEGIN’ 
GUESS?=INPUT(O>> 
“END ‘3 
‘PROCEDURE ’ TESTGUESS?s 
‘BEGIN’ 
‘IF’ NUMBER=GUESS ‘THEN’ 
‘BEGIN’ 
TEXT(Or "CORRECT! !*)5 
TRY S=15 
“END ’ 
“ELSE 


‘IF’ NUMBER<GUESS ’ THEN’ 
TEXT(Or *TOO HIGH") 


‘ELSE’ TEXT(O»s"TON LOW)» 
CRLF CQO)» 
“END ’ + 


‘REGIN’ 

INCORRECT: =0% 
TRY{=INCORRECT» 
MAKEANUMBER? 

“WHILE’ TRY=INCORRECT ‘0’ 


“REGION 
TEXT(Or*GUESS *)5 
INF UTGUESS ¢ 
TESTGUESS » 

“END 5 


“END ’ 


The 6502 Program Exchange also offers 4a very 
powerful text editor which is based on the DEC 
TECO editor. TEC65 is a line oriented (no line 
numbers) and allows for somevwery complex editing 
editing macros. For instance, you could concelv™ 
ably convert an assembly source file from one 
assembler format to another. TEC65 Lee 3 
cassette operating system which lets you save 4n 
load text files. 


m 
I've had this editing language running ©°n y 


’ * : . . eT. 
machine and am quite impressed with its Pow 
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ACCESSING THE SYM DISPLAYS 
A. M. Mackay 
600 Sixth Avenue West 
Owen Sound, Ontario 


I got my new SYM-1l a couple of weeks ago, and 
I love it. But there's a lot of work to be done- 
it's not that similar to KIM. 


Outputting on the display is a lot different- 
instead of using F9, FA and FB, you have to treat 
each 7-segment display as a unit, and get it into 
DISBUF at A640 (left display) through A645 (right 
display). But since DISBUF is in write~protected 
RAM, you have to call ACCESS sat 8B86 first to un- 
write the RAM. 


I've enclosed a little SYM-1l program to out- 
put the characters, and shown the segment coding. 
The program as written will display squirrely char- 
acters as indicated. Any character can be dig- 
played by changing the coding in 021A through O2I1F, 
using the indicated coding, and others can be found 
starting at location 8C29 in the monitor. 


This program may help novices like myself to 
get the feel of SYM. I haven't had time to figure 
out the counter yet. 


Maybe some bright USER can come up with a way 
to hook up Don Lancaster's TVT 6 5/8 to a SYM. 


Sorry that Jack Cowan had trouble with his 
Solid State 4K board. Mine worked the first time 
with my KIM (no bad chips), and when I plugged it 
into my SYM, after changing the addresses, it also 
worked perfectly. 


ACCESS = $8586 

DISBUF = $A640-45 

SCAND = $8906 

0200 A2 05 LDX @ 05 
0200 20 86 8B GETCH JSR ACCESS 
0205 BD 14 02 LDA TABLE ,X 
0208 9D 40 A6 STA DISBUF,X 
020B CA DEX 

020C 10 F7 BPL GETCH 
O20E 20 06 89 DISPL JSR SCAND 
0211 4C OE 02 IMP DISPL 
0214 79 TABLE ,BYTE 'ESCAPE' 
0215 6D 

0216 39 

0217 77 

0218 73 

0219 79 20 


Blank = 00, Decimal = 80 
SEGMENT CODE 





3D 6G or 37. 71 
76 6A 64 
1E «od 52 ¢ 
38 OU D3. oP, 
is. 49 
3E «6 5c og 


Other character codes start at Mon. address $8C29. 
To change display change coding in table 0214-0219. 


SYM NOTES & KIM-4 COMPATIBILITY 





C. Kingston 
6 Surrey Close 
White Plains NY 10607 


I note that some information on the SYM is 
being included in the ‘USER NOTES'. The SYM looked 
like a reasonable way to improve a KIM based sys- 
tem so I looked into this. The Synertek litura- 
ture states that the SYM is usable with any KIM 
based motherboard. To check, I wrote Synertek 
and asked specifically if it would work with the 
KIM-4. They replied that it would. So I got one 
and tried it, and can report that it does not work 
with the KIM-4, The trouble was tracked down to 
the fact that the KIM-4 data buffers are enabled 
at the wrong times, Thus the KIM-4 has to be al- 
tered for proper decoding. After cooling down 
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somewhat. about this development, I looked into the 
problem and came up with a solution, but not an 
optimal one. 


The following alteration will result in the 
KIM-4 being enabled for all addresses below $8000, 
and disabled for all above (and including) $8000, 
Since the SYM in its full glory will utilize al- 
most all of the addresses above $8000, this scheme 
makes sense. However, if you want to fit in some 
RAM in the unused high memory positions, you will 
have to resort to more extensive surgery on the 
KIM-4. The mod here requires that the lower 1K 
of memory be on the KIM~4, which makes the RAM on 
the SYM unnecessary. A simple change will disgable 
the low 1K ($0000-$03FF) on the KIM-4 and allow 
its use on the SYM. However, since this makes 
filling in the rest of the first 8K somewhat awk- 
ward, I prefer to ignore the SYM RAM (which should 
be removed, especially if either set of RAM's on 
the same address can be write protected.) 


First of all, you will have to remove chip 
US of the KIM-4 (the 7423) and replace it with a 
socket. Since you will in all probability de- 
stroy U5 in this process, be sure you get another 
7423 before starting. Note that some pins make 
their connection at the top of the board only. If 
a tiny bit of solder is placed on these pins at 
the base before putting the socket on the board, 
it will melt and make contact if you heat the pin 
adequately. Replacing the 7423 into the socket 
will leave the KIM-4 in its original state for the 
KIM, 


Now you will connect a 16 pin dip header to 
a 14 pin socket using the following connections: 


16 PIN (TOP) 


Aba ohh Ae me ee PAAR itn AMADEO NNN ANNAN NEES 


4 9 
6 12 
7 8 
8 GND 7 GND 
9 3 
10 2 
12 1 
16 VCC 14 VCC 


Now connect pins 10 and 11 together on the 14 
pin socket, and do the same with pins 13 and 14, 
Be sure to use covered wire as they will have to 
cross over each other. I made my connections a- 
bout % inch long so that the 14 pin socket sets 
just above the 16 pin dip header. Using solid 
hookup wire makes for a fairly firm package. Be- 
ing careful to observe the location of pin l, put 
a 7400 (or 74LS00) into the 14 pin socket. Now 
plug the converter into the socket for U5 in place 
of the 7423. The KIM-4 is now enabled for the 
lower 32K and disabled for the top 32K. The SYM 


should now work when plugged in, but not the KIM. 


To disable the KIM-4 for the first 1K, do 
not connect pins 13 and 14 on the 14 pin socket 
together. Instead, run a connection from KO on 
the applications connector (pin A=-B) to pin 13 of 
the 14 pin socket. Note that there is an unused 
nand gate in the 4700 that can be used for addi- 
tional coding if. desired. (The info in this par- 
agraph has not actually been tried yet). 


Having made the above conversion, I was then 
in a position to determine whether or not KIM pro- 
grams that use TTY or CRT 1/0 could be success~ 
fully transferred and used after changing the I/0 
vectors and/or JSR's. This led to the next prob- 
lem. Transferring programs to the SYM system from 
the KIM system sounds easy since SYM has a KIM for- 
mat tape input program. But it ain‘t easy. First 
of all, as noted in the Feb ('79) MICRO, the SYM 
stops when it detects a '2F', thinking it is the 
end of file marker. Those ‘2F' bytes that are not 
EOF's have to be changed to something else before 
transfer, and then changed back afterwards. (I 
intend writing a short program that will do this 
in the near future.) The next problem is that 
SYM will not. read tapes made with Hypertape; you 
must muse the KIM monitor speed. I suppose that 
a program could be written to read Hypertape, and 
wonder why Synertek didn't make theirs flexible 
enough to do this. (If I read the monitor proram 
correctly - and this is not easy to do because of 
all the branches and jumps it uses ~ the number 
of pulses required per bit is programmed into the 
mouitor and cannot be changed.) 











anally, adepentable mici oe OmDuner DOaId. | 
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.In performance. In quality. In availability. OEMs, educa- = * 28 double-function keypad with audio response. 
tors, engineers, hobbyists, students, industrial users: ¢ 4K byte ROM resident SUPERMON monitor includ- 
Our Versatile Interface Module, SYM-1, is a fully- ing over 30 standard monitor functions and user 
assembled, tested and warranted microcomputer board expandable. 

that’s a true single-board computer, complete with ¢ Three ROM/EPROM expansion sockets for up to 
keyboard and display. All you do is provide a +5V 24K bytes total program size. 

power supply and SYM-1 gives you the rest—and that ¢ 1K bytes 2114 static RAM, expandable to 4K bytes 
includes fast delivery and superior quality. on-board and more off-board. 


Key features include: ¢ 50 1/O lines expandable to 70. 


¢ Hardware compatibility with KIM-1 (MOS Technol- - Single + SV power requirements. = | 
ogy) products. * Priced attractively in single unit quantities; available 


¢ Standard interfaces include audio cassette with without keyboard/ display, with OEM discounts for 
remote control; both 8 bytes/second (KIM) and 185 larger quantities. 
bytes/second (SYM-1) cassette ae TTY and i— 
RS232; system expansion bus; TV/KB expansion ae el eas 
board seal four I/O buffers; and an oscilloscope Syneriek Systems 
single-line display. Corporation. 
150-160 S. Wolfe Road, Sunnyale, California 94086 


(408) 988-5690. 
To place your order now, contact your local area distributor or dealer. 


OEM Distributors Technico Technico Ancrona 

Kierulff Electronics General Radio Columbia, Maryland Culver City, California 

Sterling Electronics (Seattle only) Westem Microtechnology Computerland General Radio 

Zeus Components Future Electronics Mayfield Heights, Ohio Camden, New Jersey 
Century/Bell Alliance Electronics RNB Enterprises Advanced Computer Products 
Lionex Arrow Electronics King of Prussia, Pennsylvania Santa Ana, California 
Hallmark Computer Shop Computer Components 
Personal Computer Dealers Cambridge, Massachusetts Van Nuys, California 


Newman Computer Exchange Computer Cash Alftronics. 
Ann Arbor, Michigan Anchorage, Alaska San Jose, Califomia 





Intermark Electronics 
Quality Components 


I finally managed to transfer Tiny Basic to 
the SYM system, and after changing the I/O vec- 
tora, found that it worked. One point that I no- 
ted was that the SYM monitor converts lower case 
input into upper case, but this Looks like it 
would not be too hard to get around, 


Another point of difference in the KIM and 
SYM. I have found the KIM tape I/O to be extreme- 
ly reliable and not critical in the recorder used 
or the settings used. For the short bit that I 
have used the SYM, I have found it to be extremely 
sensitive to the recorder volume and tone settings, 
particularly for the high speed format. It was 
thoughtful of Synertek to provide a visual means 
of setting the volume and tone controls for pro- 
per reading of the tape (using a sync tape). I 
guess one must decide which is better - fast tape 
I/O but critical settings, or slower but surer 
tape I/O. 


ADDENDUM 


Since writing the above I have noted another 
problem in using the SYM with the KIM-4, KIM out- 
puts K1,2,3,4 are wire-or'd together on the KIM-4 
and pulled up with a resistor (R2). The equiva- 
lent lines on the SYM are not open collector 
lines and probably should not be wire or'd. No 
harm came to the 74LS138 on the SYM during the 
short time I used it without noticing this (at 
least no noticeable harm). These four lines can 
be separated on the KIM-4& by cutting the traces 
between them (where the connectors are soldered 
to the KIM-4 board). K4& (A-F) can be disconnected 
from R2 by removing the through plating where the 
line transfers to the bottom of the board. A four 
position dip switch could be hooked up to connect 
or disconnect the lines. 


WUMPUS & MUSIC BOX MODS FOR SYM 





Jim Adams 
17272 Dorset 
Southfield, Mi 48075 


SYM Users: Make the following modifications 
to Stan Ockers' WUMPUS program in The First Book 


LOC FROM TO 


35C E7 29 
35D 1F BC 
365 E7 29 
366 1F 8C 
376 14 47 ASCII G (GO key) to pitch Gas 
2A6 06 04 
2A7 17 A4 
2El- E7 29 
2E2 1F 8¢ 


Replace 200 thru 257 with 


200 84 DE 85 DD 20 86 8B AO OS Bl DD 49 80 C9 80 FO 
210 1F 99 40 A6 88 10 F2 A2 OA 86 DB AY 52 8D IF A& 
220 20 06 89 2C 06 A& 10 F8 C6 DB DO EF E6 DD DO D7 
230 60 


Replace 258 thru 271 with 
258 20 AF 88 C9 47 FO 05 20 75 82 BO F4 60 


Make the following modifications to Jim But- 
terfield's MUSIC BOX program in The First Book Of 


apn HEEL 9999 SANS EMERALD AT FSET DORN BONE 


KIM to play music on your on board speaker. 


LOC FROM TO 
208 BF OD 
20C 8D 20 
20D 43 A5 
20E ia 89 
219 00 60, 





24C A7 06 
259 27 08 
270 4&2 02 
ra ie 17 A4 


ATTENTION "VIM" RAND “AIM-65" USERS!!! 
THE SAN FERNAND!) VALLEY KIM-1 USERS 
CLUE IS EXPANDING ITS MEMBERSHIP TO 
INCLUDE THESE TW NEW AND EXCITING 
MICROCOMPLITER SYSTEMS. WE MEET AT ?: 38 
PM ON THE SECOND WEDNESDAY OF THE 
MONTH AT 28224 COHRSSET #16, CANOGA 
PARK, CA 94.506. CALL JIM ZUBER AT (213) 
3414-1618 IF YOU HAVE ANY QUESTIONS. 
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MANUAL CORRECTIONS 


Jody Nelis K3JZD 
132 Autumn Drive 
Trafford Pa 15085 


I have had a Rockwell AIM 65 for three weeks 
now and I can only say one thing: Fantastic ma- 
chine!!! 


The AIM is following a one year session with 
a KIM-1. The 8K monitor in the AIM takes care of 
a lot of the things that the KIM monitor needed 
additional software to handle. 


The text editor is slick especially for we 
typists who make a lot of mistakes. Entering a 
program in mnemonics is a step up from all Hex Op 
Codes. 


The user's guide shipped with the AIM was hur- 
ridly put together since it held up shipment of the 
hardware. To help others who may have an AIM 65, 
I'm passing along several items that I believe to 
be incorrect in the user's guide (October 1978 is- 
sue). 


Page 2-19 A step is missing in the program entry 
for this example. Between the "AND #0F" 
and the “BRK" there should be a "STA 
#41", 


Page 2-25 At the top of the page, the display reg- 
. ister format should read: PC PA XY § 


Page 3-20 There is a problem with the form given 
for the (indirect),Y addressing mode. 
See the separate sheet that discusses 
that subject. 


Page 3-23 Under using the K command: 
1. Type K. AIM 65 will repsond with: 
<K> *= 
2. Enter the starting address in hexa- 
decimal. AIM 65 will respond with: 


4£K> *=0300 

3. Type return. AIM 65 will respond 
with: / 

4, Specify the number of instructions.. 
ETC. 


Page 9-11 The syn test pattern program has multiple 
errors in it. This is liable to have a 
lot of people wearing out VR1 or spending 
a lot of time trouble-shooting an OK tape 
recorder. I have included a corrected 
program disassembled from the AIM 65 on 
a separate sheet. 


Page 11-3 The Olivetti type no. 295933R35 thermal 
paper that is refered to can’t be lo- 
cated in the Pittsburgh area using that 
number. In fact all of the Olivetti 
Dealers I talked to were unable to come 
up with any 2% inch wide paper at all. 

I have found that Texas Instruments #TP- 
27225 thermal paper is the right size and 
price (3 rolls for $3.69) and is avail~ 
able anywhere that TI calculators are 
sold. I haven't tried the SEARS paper 
yet but the catalog at least says it ex- 
ists, In a pinch, Radio Shack sells 3 
smaller rolls for $2.79 that will work 
also (Cat. No. 65-706). 

Page A-1] There is a problem with the form given 

for the (indirect),Y addressing mode. 

See the separate sheet that discusses 

that subject. 


Page K-10 The disassembly listing on this page and 
the next have been interchanged. 


Hopefully these corrections will aid any oth- 
er new AIM owners get aquainted with their machine. 


more... 
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VIMT™, (SYM)T™, 


(and any other KIM' bus users) buy the 
best 8K board available anywhere: 


industrial/commercial grade quality: 100 hour high temp burn- 
in: low power: KIM bus compatible 3 n for aK re gre quality & 
reliability at below S-100 prices (COMMERICALLY rated S-100 
boards cost 25-75% more). When you expand your system, expand 
with the bus optimized for 8 bit CPU's, the Commodore/Mos 
Technology 22/44 pin KIM bus, now supported by Synertek, MTU, 
Rockwell International, Problem Solver Systems, HDE, the Comput- 
erist, RNB, and others! | 

KIM-1 computer $179.00: KIM-4 Motherboard $119: power sup- 
ply for KIM-1 alone—$45: enclosure for KiM-1 alone $29: HDE pro- 
totype board with regulator, heatsink, switch address & decodin 
logic included $49.50: book “The First Book of KIM” $9.95: boo 

ett ee a Microcomputer: 6502” $8.95: SPECIAL PACKAGE 
phat 3 KIM-1, power supply, BOTH books listed above, ALL for 
920 
HDE FILE ORIENTED DISK SYSTEM (FODS) FOR KIM BUS 
‘COMPUTERS Make your KIM (or relative) the best 6502 deveiop- 
ment system available at any price. Expand with HDE's full size 
floppy system with FODS/Editor/Assembier. 2 pass assembler, 
powerful editor compatible with ARESCO files KIM bus interface 
card: fast 6502 controller handies data transfer at maximum IBM 
single density speed for excellent reliability: power mae for 4 
drives: patches to Johnson Computer/Microsoft BASIC. 45 day 
delivery. Single drive—-$1995 dual drive $2750 

Shipping extra unless order prepaid with cashier's check ALL 


items assembled, tested, guaranteed at least 90 days. 
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HUDSON DIGITAL ELECTRONICS, INC. 


<Iing §=©BOX 120, ALLAMUCHY, N.J. 07820 © 201-362-6574 


KIM- 1 PRODUCTS FROM HDE, INC. 


DM-816-M8 8K STATIC RAM MEMORY 

This is the finest memory board available for the KIM-1 at any price. Commercial/Industrial quality. All 
boards are continuously operated and tested for a minimum of 100 hours prior to release. Full 6 month parts 
labor warranty. 


DM-816-DI1 8” FLEXIBLE DISK SYSTEM 
Available in single and dual drive versions. Includes interface card, power-supply, Sykes controller and 
drive, cables and manual. File Oriented Disk System software with HDE text editor. 


DM-816-MD1. 5” FLEXIBLE DISK SYSTEM 


Single and dual drive versions include interface/controlier, power supply, Shugart drive, cables and man- 
ual. Advanced version of FODS software with HDE text editor. Latest addition to HDE peripheral product line. 


DM-816-CC15 MOTHER BOARD 
A professional mother board for.the KIM-1. Ali KIM-1 functions remoted, includes power on reset. 15 con- 
nectors. Provision for Centronics printer interface, Card cage and cabinet configurations available. 


DM-816-UB1 PROTOTYPE CARD 


Designed for ease of special applications development. Handles up to 40 pin dips. 


HDE ASSEMBLER 

An advanced, two pass assembler using 6502 cross-assembler mnemonics. Free form, tine oriented entry. 
Directives include: .OPTION, .BYTE, .WORD, .FILE, OFFSET, .END. Output options include: LIST, NOLIST, 
SYMBOLS, NOSYMBOLS, GENERATE, NOGENERATE, ERRORS, NOERRORS, TAB, NOTAB. Assemble from 
single or multiple source files. Place source, object and symbol table anywhere in memory. Automatic paging 
with header and page number. User's manual. Approximately 4K. Loads at 2000 or EOOO. Specify on order. 


HDE TEXT OUTPUT PROCESSING SYSTEM (TOPS) 

A comprehensive output processor, including left, right and full justification, variable page length, page 
numbering (Arabic or U/C and L/C Roman), page titling, string constants, leading and trailing edge tabbing, 
field sequence modification, selective repeat, selective page output and much more. Over 30 commands to for- 
mat and control output of letters, documents, manuscripts. User's manual. Approximately 4K. Loads at 2100 or 
E100. Specify on order. 


HDE DYNAMIC DEBUGGING TOOL (DDT) 


Built in assembler/disassembier coupled with program controlled single step and dynamic breakpoint 
entry/deletion facilitates rapid isolation, identification and correction of programs under development. Key- 
strokes minimized with single letter, unshifted commands and optional arguments. User’s manual. Approxi- 
mately 2K. Loads at 2000 or EOOO. Specify on order. 


HDE COMPREHENSIVE MEMORY TEST (CMT) 

Eight separate diagnostic routines test for a variety of memory problems. Each diagnostic, the sequence 
of execution, the number of passes and hait/continue on erroris selected by the user on call-up. Tests include 
pattern entry and recall, walking bit, data-address interaction, access time and cross talk, simulated cassette 
load, slow leaks. Suitable for static and dynamic ram. User’s manual. Approximately 3K. Loads at 2000 or EQOO. 
Specify on order. 


HDE TEXT EDITOR (TED) 

Complete, line oriented text editor accepts upper or lower case commands. Functions include line edit, 
line move, line delete, block delete, resequence, append, list, print, locate, set, scratch, automatic/semi-auto- 
matic line numbering, lastcommand recall, job command. This editor is supplied with all HDE Disk Systems. 
User's Manual. Approximately 4K. Loads at 2000 or EOOO. Specify on order. 


ALL PROGRAMS ARE AVAILABLE FOR LOCATIONS OTHER THAN 
THOSE SPECIFIED AT ADDITIONAL CHARGE. ~. 


Disk-Note A Cassette-Note B Manual Only Note C 





HDE Assembler $ 75.00 $ 80.00 $ 5.00 $25.00 
HDE Text Output Processing System (TOPS) 135.00 142.50 10.00 15.00 
HDE Dynamic Debugging Tool (DDT) 65.00 68.50 5.00 5.00 
HDE Comprehensive Memory Test (CMT) 65.00 68.50 3.00 5.00 
HDE Text Editor (TED) N/C 50.00 5.00 15.00 


Note A. Media charge $8.00 additional per order. Save by combining orders. 
Note B. Cassette versions available 2nd qtr. 1979. 
Note C. Additional charge for object assembled to other than specified locations. 


ORDER DIRECT OR FROM THESE FINE DEALERS: 


JOHNSON COMPUTER PLAINSMAN MICROSYSTEMS ARESCO 
Box 523 Box 1712 P.O. Box 43 
Medina, Ohio 44256 Auburn, Ala. 36830 Audubon, Pa. 19407 


218-725-4560 I te ce 
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Corrected SYN test pattern program 


A ee 24S 2 Shin i Soe AMM nt Rip a bn inn AS AN a Ha EO ieee aks Met eon meet WERE oda 





END 


/03 

0300 20 JSR F21D 
0303 20 JSR F24A 
0306 4C JMP 0303 


£K>*=0310 
{11 
0310 A2 LDX #00 
0312 A9 LDA #CE 
0314 20 JSR EF7B 
0317 20 JSR EDEA 
O31A A2 LDX #00 
031C A9 LDA #D9 
O31E 20 JSR EF7B 
0321 20 JSR EE29 
0324 C9 CMP #16 
0326 FO BEQ 0321 
0328 DO BNE 0310 


CONTRADICTIONS & CONFUSION IN THE TABLES OF AD- 
DRESSING MODE FORMATS FOR USE WITH THE AIM 65 
MNEMONTIC ENTRY MODE 


AS Eee MAO A NEO a AO ERAT SPOS REN SURO OSE SOO CY NEN BRNO S LMR Ha REI Hal GN OLGA ARR 


Sen as tere ANN RS tree IE EA ALT LS Ga ey TA Dai HO AN SORA YY Aad te DHEASAN TEC OPE ARNESON SORE NA IAS AIO RPI ENNIS A, 


err En rr rei | et a ee ee I RECURSO Tel wR ea rrr rear E Se le SFr eee cone een mi 


The operand format given for the (indirect),Y 
addressing mode is incorrect. Both the (HH,Y and 
the (HH,Y) formats, when entered, end up being de- 
coded as an (indirect,X) opcode. Needless to say, 
this bombs a program badly!! 


In the AIM 65 User's Guide on page A-1: 


Seas inden C008 SAY eS RNS Aa AN Sa a EOP NO, 2A HE A 


The same comments as above apply. 


an 0 Sa itt eS it fn i Ne ENN NAM OS SNR 8% cA te oe PR Pah RE a he err 


One of the operand formats given for the (in- 
direct),Y addresaing mode is correct here. The 
(HH)Y works fine. The (HH,Y) format given here is 
no good as noted above, 


Se aaaaRaa MeL GREET ERMA 


SSH ins Seatiencee ernie cola ON 


SUMMARY : 


The (HH)y operand format on page 3-20 is the 
only one given that runs properly. By experimen- 
tation, I have also found that (HH),Y also works 
and should be listed as the alternate for those 
who like it longer but correctly written. 


I also noted that all three of the sources of 
information on the mnemonic instruction operand 
listed above have an addressing mode listed as 
(absolute indirect). I'm no expert on the 6502, 
but I know of no such addressing mode!! 


(EDITORS NOTE: What about JUMP INDIRECT?) 


POLYMORPHICS VIDEO/KIM INTERFACE 


by Mike Firth 
104 N St Mary 
Dallas Tx 75214 


I am using a Polymorphics Video Interface 
with my KIM-1. My purpose here is to describe 
what I did to make it work (besides spend money), 
which was simpler (except for my mistakes) than I 
thought it would be. Some of what I have to say 
will be applicable to using an S100 memory board, 
since the VDM is memory mapped. 


I selected the Polymorphics board because, at 
the time, it was the only display that would give 
me both upper and lower case (which I needed for 
editing) along with graphics. I felt for my pur- 
poses, graphics would be more useful than the re- 
versed background offered on other $100 boards. 
(Besides I have worked on terminals with white 
background and the glare bothers me.) I also 
wanted to have the option of displaying control 
characters, which SWTC and other TVT's usually 


| OPTIMAL TRCHNOLOGY, wc. 
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SOFTWARE AVAILABLE FOR F-8, 8080, 6800, 8085, 2-80, 

6502, KIM-1, 1802, 2650. 
EPROM type is selected by a personality module which plugs 
into the front of the programmer. Power requirements are 
115 VAC, 50/60 HZ at 15 watts. It is supplied with a 36 inch 
ribbon cable for connecting to microcomputer. Requires 1 % 
I/O ports. Priced at $145 with one set of software, per- 
sonality modules are shown below. 
















Part No. Programs Price 
PM-O TMS 2708 $15.00 
PM-1] 2704, 2708 15.00 
PM-2 2732 25.00 
PM-3 TMS 2716 15.00 
PM-4 TMS 2532 25.00 
PM-5 TMS 2516, 2716, 2758 15.00 






Optimal Technology, Inc. 
Blue Wood 127, Earlysville, VA 22936 
Phone 804-973-5482 






don't. I wanted software control. 


The graphics on the Polymorphics board con- 
sists of using the lower six bits of the word to 
each control one small square fitted in three rows 
of two each that fill all the space taken by a 
letter. That means the graphics fit edge to edge. 
One letter character (1111111) fills a portion of 
the block, like typing capitals on top of each 
other, thus @®. 


One problem with the graphics is that some 
strange early decision decided that having bit 7 
(most significant bit) set (=1) would be ASCII 
character, while unset (=0) would be graphics. 

One could add and remove the bit with software, 
but I am going to invert the data line to the vid- 
eo hoard so tests, et.al. are easier, 


Any S100 board provides many control lines 
because of the way the 8080 accesses memory and 
1/O. The 8080 requires separate data in and data 
out buslines and also must allow for I/O Ports 
that are activated with address lines and an a 
PINT line. That. also means that there has to be 
a control for memory read and another for memory 
write, which there is. Also, since the 8080 is an 
early device, really odd blips can appear on the 
address lines while the CPU is internally working, 
so “there are timing restrictions. 










We are fortunate because the address lines 
stay valid for the entire clock cycle and because 
the data lines are bi-directional. Since the vid- 
eo board has both in and out buffered, we can just 
tie the appropriate lines (eg. bit 7 in and bit 7 
out) together. 


The RAM R/W line from the KIM turns out to be 
the only line we need to control the access to the 
video board, IF WE ARE WILLING TO ADD A COUPLE OF 
JUMPERS ON THE BOARD AND CUT TWO TRACES, we don't 
need any chips off the board, (What I am about to 
describe can be done off the board, sort of.) All 
of the changes take place in a one inch square area 
on the board. 


Rage 23 


We take advantage of an unused gate in IC9, a 
74LS00, and we cut a trace to take advantage of 
another gate originally used as an invertor. The 
other trace to cut is the one that controls the 
data bus from the board to the computer, As wired, 
it is always connected, except during a write, when 
it goes trigtate, By installing a jumper, it will 
be tristate except when the video board is actually 
addressed, 


(Editors Note: The 1.C. numbers and the pinout re- 
fer to an earky modek of Pokymorzphics VTI-64 Video 
Board. I have the Rev 'F' version and had to do 
some transposing of 1.C. numbers and pinouts, but 
got everything working OK.) 


As shown on the circuit, BS- goes low when 
the proper 1K of memory is addressed. This is in- 
verted through IC9A, then is usually NANDed with 
8080 memory write to control the data buffers into 
the board. We are going to replace MWR+, 


We bring in the KIM RAM R/W line on pin 47 to 
Ic9C ag usual. But if this ie all we did, the in- 
verted signal would messup the video display EVERY 
TIME WE DID A WRITE OPERATION ANYPLACE, So, we 
cut the trace to pin §$ if IC9 and run a jumper 
from pin 11 to gin 5 of IC9 (arn't we intimate). 
This insures that pin 6 is low only during access 
to thig block. We then install a jumper from IC9 
‘pin 6 to IC8 pin 3, which controls the tristate 
(and is next to IC9). 


tie 
{ 
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Two more jumpers remain. One goes from pin 4 
of IC9 to pin 1, carrying the RAM R/W signal to the 
unused gate in IC9 to use it as an invertor. The 
output of IC9D (pin 3) is jumpered to IC9B (pin 9) 
to replace the 8080 MWR+ mentioned earlier, Also, 
pin 2 of IC9 has to be jumpered to +5 (better prac- 
tice) or to pin l. 


And that is that. Connect the video board to 
a monitor, plug everything in and wait. The Poly- 
morphics manual suggests aid for the board. If 
you get a good stable display, write a program 
that. will load a regularly varying bit pattern in- 
to successive locations. If the display shows the 
same character repeated 2 times, or four times, you 
probably have miswired something and lost a data 
line or two (I did, two lines were on the wrong 
pins on the $100 connector). I£ you can't access 
a part of the screen, or the program writes over 
some areas and doesn’t touch others, then an ad- 
dresa line is buggy. You should note that even if 
you only have 16 lines 32 characters long (512 
characters), the video board takes up 1K of memory, 
since it is AS that is ignored. This save rewriting 


some software if you add the other 32 later. 


With KIM, you can use the monitor to load 
(and read) any location one-by-~one. KIM accesses 
the memory periodically, which you will note as a 
line on the screen which disappears if you access 
elsewhere. 


TVT~6 NOTES & RAM EXPANSION 


by Milan Merhar 
697 Boylston St 
Brookline Ma 02146 


More TVT-6 stuff and another way to fill the 
lower 4K hole in KIM. 


I read the letter in #13 re the TVT-6 and I 
thought 1'd pass along some comments. 


My cassette copy of the TVT-6 programs from 
PAIA were very corrupt. Obviously, they were 
keyed in, not checked, and recorded. Check the 
programs against the listings before running. 


One listing error for the cursor routine: 
the contents of $0185 should be $03 rather than 
$01. 


Dennis Chaput's problems with the cursor rou- 
tine not working can be traced to Don Lancaster's 
cryptic note at the end of the cursor program list- 
ing: "To protect page entry, load OOF3 04, to en- 
able page entry, load OOF3 OO". 


This initializes the accumulator to 04 or O00 
via KIM's monitor at run time and therefore Does 
Nothing! 


Obviously, Lancaster meant to initialize OOF1 
to 04 or “initialize the status byte to disable 
interrupts’ to protect the page and initialize 
OOF1 to 00 or "enable interrupts”™ to access the 
cursor routine normally. 


Also note that "Erase to end" and"Sparehook" 
comments are reversed in the cursor program com- 
mentary. ASCII 13 is "erase to end of line", AS- 
CIl 12 is “space". 


1f you're running Tiny Basic or the TVT-6 
from low memory, you usually want to expand memory 
at low addresses rather than start all over again 
at 2000 hex and up. Most suggestions to squeeze 
4K of RAM into the lowest memory space involves 
fancy bussing of individual chip selects to each 
1K of RAM to be added, There's an easier way! 


Set your commercially available 4K memory 
board to fill addresses 0000 hex to OFFF hex and 
move KIM's 1K RAM to addresses 1000 hex to 13FF 
hex. 


This gives 5K of contiguous RAM for use with 
Tiny Basic at 0200 hex or such. 


The mod requires a jumper wire and one 1000 
ohm resistor to be added. 
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Please note that “page zero" and the stack 
are now physically in the 4K RAM board which must 
be present for the monitor to function. Incorp- 
orating this mod to the mods for the TVT-6 gives 
something like this: 
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The SPDT switch selects 
whether the KIM 1K RAM 
is at 0000 hex to O3FF 
hex (with the 4K RAM 
removed!) or at 1000 
hex to 13FF hex (with 
the 4K RAM present) 


The DPDT switch is for 
normal use with the 
TVT-6 out of its socket, 


The TVT-6 can be wired up to the 4K board ag 
discussed by Michael Allen in #13 or can work out 
of KIM'’s 1K RAM at 1200 hex to 13FF hex. Patches 
are simple: The SCAN routines work is written: the 


cursor is changed by adding 10 hex to the contents 


of these locations: 0106, O10A, O16E, 0185, O1A0, 
01¢C7, OLDC. ; 


If you are using Tiny Basic, move the cursor 
routine to 1100 hex and Tiny Basic can have 14K 
for user programs from OBOO hex to 1OFF hex. Make 
sure to initialize Tiny's program space pointers 
to keep from overwriting your cursor program & dis- 
play memory in a normal "cold start" 


INTERFACING TO THE TVT-I1 


by John M. Rensberger 
1920 NW Milford Way 
Seattle Wa 98177 


The KIM-1 TTY input and output interface nice- 
ly and simply with the CT 1024 TV Typewriter II. 
However, discovering how to effect this was not 
easy. MOS Technology supplies no information in 
their otherwise very extensive literature. 


I finally discovered, after 50 hours of 
searching for a problem in the serial interface and 
UART of the TVT II, that there is no parity bit, 
the 8th bit is a 1, and the polarity of the signal 
as it comes from che transistor interface of Rick 
Simpson (July User Notes Vol 1) is inverted with 


respect to the R§232 input requirements of the 
TVT IL serial interface. 


Therefore, users attempting to make this in- 
terface should use or beware of the Following con- 
ditions: 

1, Omit the inverter in Simpson's cir- 
cuit, 

2. Program the serial interface of the 
IVT Il for NO parity, bit 8=1. 


3. IT used neither ground nor the -5 volt 
option on Simpson's circuit. (EDITORS 
NOTE: I didn't understand this one). 

4. Lower the resistence'’of the RS232 in-~ 
put of the TVT serial interface by 
replacing R-19 (1K) with a 300 
Tesistor, 


Knowing the correct bit pattern and that the 
polarity from the KIM system is correct without 
inversion should make the interfacing task very 
simple for anyone wishing to use a TV typewriter 
as a terminal, 


Gary and Lisa Rensberger (ages 14 and 16) 
have completed a machine language program for KIM 
that will work with either TVT II or TTY. They 
would be delighted to hear from users who would 
like a TIC-TAC~-TOE game (700 bytes) in exchange 
for any other game (listing or KIM compatible tape). 


TE stuff 


Ted Beach - K4MKX 
5112 Williamsburg Blvd. 
Arlington Va 22207 





MAKE A SHORT CASSETTE 


iden nnth entrance gale tt aha MALY a RTE I A A a SO AC 


Regarding your search for Cl5 tapes, I gave 
up On that idea long ago. Instead, what I started 
to do originally was buy "cassette repair kits" 
sold by Lafayette Radio for about 69 cents each. 
These are tape housings with a leader from spool 
to spool. I then spliced in my required length of 
tape which I cut off of a good quality C60 tape. 
Radio Shack and Lafayette both have inexpensive 
(about $4.00) cassette splicing machines. 


That drill got a bit expensive, so I started 
buying "El Cheapo" drugstore tapes (three C30's 
for $1.29) and discarding the tape from the hous- 
ings. Works real neat. Now I record the desired 
number of programs or subroutines on my good C60 
tape, run off another foot or so of tape, then 
clip the tape in the center of the middle opening 
(where the pressure pads are). Then I pull both 
ends of the tape out and splice the end coming from 
the takeup spool to the leader going to the supply 
spool of El Cheapo cassette (tape already discard- 
ed). 


A pencil stuck in the hub of the supply spool 
will quickly rewind the tape into its new housing. 
At the end, cut the tape from the original leader, 
splice it onto the leader of the takeup spool of 
the new housing and reconnect the free end of the 
C60 tape to its takeup leader. You will eventu- 
ally run out of takeup leader on your "good" tape, 
but what the heck - tape is cheap! 


As an alternative, you can allow a foot or so 
of the beginning of the original tape to be used as 
a leader (mark it with a marker pen and don't start 
recording until this part is on the takeup spool). 
This way you can get amximum use from the good tape 
by sacrificing a foot of it to begin with. When 
you're through, you will have another empty cas- 
sette housing to use, with full length leaders. 


CASSETTE DIRECTORY PRINTOUT PROGRAM 


Chris McCormack 
»--prarnts your tape dinect- 116 Milburn Lane 
ory on your TTY or teamenal East Hills, NY 11577 


This program is an expansion of the directory 
program, written by Jim Butterfield. The advan- 
tage of this program is that it will search a whole 
tape, and output the ID, starting address, and 
ending address of any program found. Because all 
of the branches are (EXC 0037) relative, the pro- 
gram is completely relocatable. Program start is 
at address OOS5SF. 


0000 D8 TOP CLD 

0001 <A9 O07 LDA #$07 
0003 8D 42 17 STA SBD 
0006 20 41 1A. SYN JSR RDBIT 
0009 46 FY LSR INH 
O0O0B O5 FI ORA INH 
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O000D 85 F9 STA INH 


OOOF c9 16 TST CMP #'SYN 
0011 bDO F3 BNE SYN 
0013 20 24 1A JSR RDCHT 
0016 C6 FY DEC INH 
0018 10 F5 BPL TST 
OO1A C9 2A CMP #'* 
ooic DO Fi BNE TST 
OO1E A2 FD LDX #$FD 
0020 20 F3 19 RD JSR RDBYT 
0023 95 FC STA POINTH+1,X 
0025 £E8 INX 
0026 30 F8 BML RD 
0028 A2 02 MORE LDX #$02 
002A 20 24 1A SECOND JSR RDCHT 
002D C9 2F CMP #'/ 
OO2F FO 09 BEQ OUT 
0031 CA DEX 
0032 DO F& BNE SECOND 
0034 20 EA 19 JSR INCVEB 
0037 4c 28 00 JMP MORE 
(NOTE: MUST BE CHANGED IF RELOCATED) 
OO3A A5 F9 OUT LDA INH 
003cC 20 3B 1E JSR PRTIBYT 
OO3F 20 9E 1E JSR OUTSP 
0042 20 9E 1E JSR OUTSP 
0045 20 1E lE JSR PRTPNT 
0048 18 CLC 
0049 AD ED 17 LDA VEB+l 
004c 65 FA ADC POINTL 
OO4E 85 FA STA POINTL 
0050 AD EE 17 LDA VEB+2 
0053 65 FB ADC POINTR 
0055 85 FB STA POINTH 
0057 AQ 2D LDA #'- 
0059 20 AO 1E JSR OUTCH 
005c 20 1E 1E JSR PRTPNT 
OO5F 20 2F 1E START JSR CRLF 
0062 20 32 19 JSR INTVEB 
-0065 18 CLC 
0066 90 98 BCC TOP 


ZIPTAPE CASSETTE INTERFACE (a review) 


Wanna be able to load BASIC in 13 seconds? 
That's right - 13 seconds for an 8K load (about 
12 times faster ‘than HYPERTAPE).(600 bytes/sec). 


As you can tell, I'm pretty enthusiastic 
about the cassette interface from Lew Edwards. So 
far, this system has proved 100% reliable at 4800 
baud. I use a Sankyo ST-50 cassette recorder. 


This interface consists of a 2"x2" p.c. 
board using a single IC (needs 5 v. @ 10 ma.) and 
346 bytes of driver software. It uses 3 bits 
(PAO, PAl, and PA2) of KIM's I/0, and from $0200 
to $02A8 and $0300 to $03B2 of KIM's memory. 


The documentation, which includes a full 
source listing of the driver software as well as a 
schematic of the hardware, comes with enough in- 
formation to enable the user to get this system 
running on ANY 6502 system that has 3 bits of a 
6530, 6532, 6520 or 6522 available for use. 


This system can be operated at 2400 or 3600 
baud if your recorder can't handle the full 4800 
baud speed. 





KIM S 


For $26.50 you get an assembled interface 
board, a cassette of the software, and full docu- 
mentation from Lew Edwards, 1451 Hamilton Ave., 
Trenton, N.J. 08629. 


If you just can't swing a floppy-disc, Zip- 
tape will ease the pain. 
- ERIC 


CASSETTE AVAILABILITY 


Are you looking for some high-quality short and 
medium length cassettes? AB Computers (POB 104, 
Perkasie, PA 18944 (215)257-8195) has some which 
come in 5-screw housings and use AGFA tape. 


We use these cassettes for software distribution 
here at USER NOTES and have been quite satisfied 
with them. Here's the price list: 


ClO (Smin/side) 10/$6.25 
C30 (15min/side) 10/$8.00 
plastic housings 10/$1.00 


EDITORIAL (continued from inside the cover) 


Things we'd like to know: What boards have 
you used successfully in the KIMSI? What mods did 
you have to perform to get other boards operation- 
al? Has anyone figured out a way of modifying the 
KIMSI so that the special 1/0 port of the memory 


map is moved down into KIMs' 4K "black hole" ($0400 
$13FF)? 


MANUFACTURERS 


Need some ideas for new products? The 44 pin 
KIMBUS is gaining in popularity now that Rockwell 
and Synertek have entered the marketplace with 
products intended to be used with the KIM-4, 
There's always room in the RAM board market, how 
‘bout a low-cost dynamic RAM board which can take 
advantage of the super low-cost 4116 which are be- 
ing offered for the TRS-80 and APPLE machines. 
I've seen a set of eight going for as low as $80.00. 
That's 16K!!! A good 64x16 or 80x24 video board 
is desperately needed, 


How 'bout an EPROM board that can also pro- 
gram the 2708 or 2716. (At this point, the hob- 
byist is money ahead by sticking to the 2708, as 
low as $5.00, unless he really needs the single 
voltage @f the Intel 2716.) A combination serial/ 
parallel board using the 6522 and maybe the new 
Synertek 6551 ACIA would be very popular (2P+2S7). 


(ahem i SO Ar Soi A AA RA MN 


Microsoft has written versions of BASIC to 
run on all major 6502 machines (KIM, APPLE, PET 
and OSI.) Although, for the most part, a program 
written for one machine can be run on another ma~ 
chine if they are typed in, a memory image cannot 
be transferred from one type of machine to another 
(PET to KIM, for example). The reason? First of 
all, when you type a BASIC program into your com- 
puter (with Microsoft BASIC, anyway) the program 
is compressed by changing BASIC commands into 


CONTINUED ON NEXT PAGE 














OUR PRESENT OFFERINGS INCLUDE : 
We know that you have better thincs to de with es 


your tame than punching hex code into your machine. 
Because of this, we have made some of the Longer 
programs available on KIM cassette. 


KIMATH (apecify $2000 on S$F800 version).....$12.00 
(includes errata sheet f0r% manual) 


: ‘ . HEXPAWN (420m LAAUL WIS eu kd eee Beret ew eee C00 
These cassettes are original dumps, not copies, 


made with top quality 5-scraew housing cassettes. 
Thinty seconds of syne characters paecede the prog- 
nam to enable you to tune up your recorder or PLL. BANNER. (2his- 4ASUC) sie saaudcneveeteiwdess 


DISASSEMBLER (thLA LAAUC) Leer c eee e ance nnn ne 95608 





ikea s S400 


Ane you AIM & SYM owners interested in having 


Aome of these programs available for your machines? PAYMENT MUST BE IN U.S. FUNDS, 


OVERSEAS CUSTOMERS--include $1.00 extra 
6502 USER NOTES, POB 33093, N. ROYALTON OHIO per cassette for extra postage. 
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“tokena"”. For example, if you type in 100 PRINT 
"HI", BASIC would store two bytes for the address, 
and one byte for PRINT. "HI" would be stored with- 
out change. Using one byte "tokens" lets you get 
a larger BASIC program into smaller areas and could 
even help them run faster. Only one problem: 

Each different version of BASIC uses its own unique 
‘token' identifiers. (Does anyone know why this 

is so?) 


The only way to transfer BASIC programs from 
one type of 6502 machine to another is to "LEST" 
the program out to the other computer. In other 
words, instead of listing the BASIC program to 
your printer, the output would be "vectored" to a 
new Output routine which would talk to your object 
computer. The object computer would also be run- 
ning BASIC and it would expect its “input" from the 
first computer instead of its own keyboard. Tricky, 
huh? 


The PET, for example, is set up to list a program 

to a device on its IEEE bus so if I wanted to trans- 
fer some BASIC programs from the PET to the KIM, I 
would hook the KIM up to the PET's IEEE bus and 
"list" the program to the KIM. Don't forget, KIM 
needs to have BASIC running and modified so that 

its input comes from the EEEE bus so that its in- 
terface instead of the terminal. 


Such a PET to KIM BASIC interface is on my 
list of projects so it may get done in my life- 
time. 


Those of you that are running KIM-4, or com- 
patible, motherboards will be happy to hear that 
I now have in my hot little hands an article on 
how to build a 32K dynamic RAM board using the 4116 
devices which are being used to expand the APPLE 
computer. (You've seen them in all the mags for 
$80 - $100 per 16K.) The RAM card contains its 
own built-in, invisible refresh circuit and can be 
built on a 4,5x6 size Vector wire wrap card. 


According to the author -"In eight months of 
constant use with a KIM-1 and KIM-4, no problems 
of any kind have been encountered with the unit. 
A second unit, built at the end of 1978, also 
works well," 


Sorry, you'll have to wait for the next issue 
for this one, 


announcements 
and reviews 
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Tiny Editor/Assembler and Robot 


If you only have 4K of expansion and want to 
assemble programs, (once you start assembling your 
programs, you'll never go back to hand assembly!) 
You may want more info on this tiny editor/assem- 
bler package. The flyer didn't mention what type 
of 1/0 device was supported or where the package 
was assembled to operate from, but the ROBOT lLan- 
guage supports the TVT-6 and needs RAM expansion 
starting from $0400 so the assembler requirements 
may be similar. 


The single pass assembler overlays the editor 
in RAM and, except for the zero page references, 
seems to conform to the MOS definitions. 


The price is $23.00 for the user manual, com- 
mented source listing ($20.00 without the cassette). 


ROBOT is actually an interactive robot con- 
trol language. The robot that is controlled is 
currently the cursor on the TVT-6 video board but 
it looks as if the user could modify this to con- 


trol a “real” robot or a standard memory mapped 
video output device, ROBOT needs memory from 
$0200-$0540 and a TVT-6, I have this package and 
will be reassembling it to run an my system as 
soon as I get some time (fat chance!). This looks 
to be a very interesting package. 


Several articles on an 8080 version have been 
published in Doctor Dobbs Journal. 


ROBOT sells for $8.00 and includes a user 
manual, commented gource listing and a cassette 
($5.00 without the cassette). It's worth $5.00 
just to see how it works! 


Contact Michael Allen, 6025 Kimbark, Chicago 
T1l 60637. 


PRODUCT REVIEW of the HDE DISC SYSTEM by the editor 


A number of you have asked for details about 
the HDE full size disc system. 


The system is based around the SYKES 8" drive 
with the 6502 based intelligent controller. 


This drive is soft sectored, IBM compatible, 
and single density which lets you store about a 
quarter megabyte of data on a disc, 


The system software, called FODS (File Ori- 
ented Disc System), manages sequential files on 
the disc much the same way files are written on 
magnetic tape ~- one after another. When a file is 
deleted, from a sequentially managed file system, 
the space that the file occupied is not immediate- 
ly reallocated, as in some disc operating systems. 
As it turns out, this can be an advantage as well 
as a disadvantage since deleted files on the FODS 
system can be recovered after the file has been 
deleted. (This has saved my sanity more than 
once!) Of course when you want to recover some of 
the disc space taken up by a number: of these de- 
leted files, you can simply re-pack or compress 
the disc and all the active files will be shifted 
down until there are no deleted files hanging a- 
round using up space. 


FODS has this ability to repack a disc, 


When saving and loading in FODS you work with 
named files, not track and sector data or I,D, 
bytes. This makes life alot easier. I've seen 
some disc systems where you have to specify track 
and sector info and/or I.D. bytes. What a pain 
that can be! 


If you just want to save a source file temp- 
orarily, you can do that on what's known as 
"seratch-pads". There are two of these on a disc, 
"scratch-pade A" and "scratch-pad B", each of these 
temporary disc files can hold up to 16K or if "B" 
is not used, "A" can hold one file up to 32K in 
length. The only files that can be temporarily 
saved on scratch pad are files that have been 
built using the system text editor. 


Being a dyed in the wool assembly language 
programmer, I really appreciate the FODS text ed- 
itor! This line oriented editor is upwards com- 
patible with the MOS/ARESCO editor but includes a- 
bout everything you could aske for ina line edi- 
tor. There is a full and semi-automatic line num- 
bering feature, lines can be edited while they are 
being entered or recalled and edited later, strings 
can be located and substituted, the line numbers 
can be resequenced, the file size can be found, 
the hex address of a line can be known and comments 
can be appended to an assembly file after it has 
been found correct. Oops! I forgot to say lines 
can also be moved around and deleted. This isn't 
the complete list of FODS editor commands, just 
the ones that immediately come to mind, 


Another very powerful feature of the system 
is the ability to actually execute a file contain- 
ing a string of commands. For example, the news-~- 
letter mailing list is now being stored on disc. 
When I want to make labels, I would normally have 
to load each letter file and run the labels print- 
ing program. But with FODS, I can build up a "JOB" 
file of commands and execute it. 
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HUDSON DIGITAL ELECTRONICS INC. 


ANNOUNCING: 
COMPUTER PROGRAMS FOR THE KIM-1 
HDE ASSEMBLER 


An advanced, two pass assembler using 6502 cross-assembler mnemonics. Free 
. form, line oriented entry. Directives include: .OPTION, .BYTE, .WORD, .FILE, .OFFSET, 
.END. Output options include LIST, NOLIST, SYMBOL TABLE, NO SYMBOL TABLE, 
GENERATE, NOGENERATE, ERRORS, NOERRORS, TAB, NOTAB. Assemble using 
single or multiple files. Place source, object and symbol table anywhere in memory. Aut- 
omatic paging, with header and page number. Approximately 4K. Loads at EOOO or 2000. 


HDE TEXT OUTPUT PROCESSING SYSTEM (TOPS) 


Acomprehensive output processor, including left, right and full justification, vari- 
able page length, page numbering (Arabic, capital and lower case Roman), page ti- 
tling, leading and trailing edge tabbing, field sequence modification, selective repeat, 
selective page output, etc. More than 30 commands to format and control output of 
‘letters, documents, manuscripts and textual material of all types. Approximately 4K. 
Loads at E100 or 2100. 


HDE DYNAMIC DEBUGGING TOOL (DDT) 


Built-in assembler/disassembler coupled with single step and dynamic break- 
point entry/deletion facilitates rapid isolation, correlation and test of programs. Key- 
strokes minimized with single letter, unshifted commands, and optional arguments. 
Approximately 2K. Loads at EOOO or 2000. 


WATCH FOR PRODUCT ANNOUNCEMENTS THIS YEAR TO INCLUDE: 
| ® Dual Channel RS-232 interface with auto answer 
® Eprom card, eprom programmer 
@ NEC, Diablo printer interface. 





All HDE memory and interface cards are KIM-4 compatible in a 4%2” X 612” format 
with on-board 5 volt regulation and address selection switches. Complex circuits are 
socketed for ease of maintenance. All products include a 90 day full parts and labor 
warranty, except memory boards which are 6 months, and computer programs which 
have a limited warranty. | 


ORDER DIRECT OR FROM THESE FINE DEALERS: 


JOHNSON COMPUTER| PLAINSMAN MICROSYSTEMS ARESCO 
Box 523 Box 1712 P.O. Box 43 
Medina, Ohio 44256 Auburn, Ala. 36830 Audubon, Pa. 19407 











216-725-4560 | 800-633-8724 | ~—-215-631-9052_ 


